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Bi 


T = ‘VO1.0 


MODULE NQNA1 ad be we DEGNA FUNCTIONAL TEST’ 


ADDRESSIN™ _ MODE ( ABSOLUTE), 
Cet [S$S16)) = 


LANGUAGE 
SSBTTL ‘GLOBAL DEFINITION *.0DULE’ 


BEGIN 
s( 


IDENTIFICATION 


PRODUCT CODE: AC-T851A-MC 
PRODUCT NAME: CNQNAAO DEQNA FUNCTIONAL TEST 
PRODUCT DATE: 9 JULY 1984 


MAINTAINER: ASD/DIAGNOSTIC SERVICES 
AUTHOR : S. MAZURCZYK 
MODIFIED BY: JAKT BERG 9-JUL - 1984 


COPYRIGHT (C) 1984 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A SINGLE 
COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE INCLUSION OF THE 


EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE 
Lote ne nee TO AND GWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
“2 conv tere NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC. 


THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 


DIGITAL POP UNIBUS MASSBUS 
DEC DECUS DECTAPE 
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i 
v0O1.0 GLOBAL DEFINITION MODULE 99-Jul-1984 0 
1.0 GENERAL INFORMATION 


The DIGITAL ETHERNET Q-Bus Network Adapter (DEQNA) Field Functional 
Diagnostic P em (NQNA) performs extensive functional testing of 
the DEQNA/M module for Q18 or Q22-Bus based PDP-11 systems. 
program attempts to isolate faults to the following Field Replacable 
Units (FRU's): DEQNA, bulkhead assembly, transceiver cable, circuit 
breaker ( fuse in bulkhead assembly ) and transceiver. This software 
also attempts to localize faults to the functionel areas of the DEQNA 


module. 


A test operator controls testing of the module from a console 
( hard copy or CRT ). 


This diagnostic has been written for use with the diagnostic 
runtime services software (supervisor). These services provide 
the interface to the operator and to the software environment. 
For a complete description of the runtime services, refer to the 
XXDP+ user's manual. There is e brief description of the runtime 
services in section 2 of this document. 


1.2 SYSTEM REQUIREMENTS 


The NQNA software operates on an SBC-11/21+ (FALCON+) system 

that has one or two DEQGNA modules on the system bus. 

The internal and internel/extended loopback mode tests do not 
require the transceiver or the loopback connector to be unplugged. 
The external loopback mode may be used with a terminated transceiver 
thet has no network cable attached. 


Testing DEQNA module and its interface to the Ethernet requires 
following hardwere: 


- SBC-11/21+ CFALCON-), 

- DEQNA le, 

- Minimum of 28K words of memory ( supporting block or non-block mode ), 
- Console terminal, 

- Loopback connector ( male loopback connector, Part @ 12 221 96-01 ). 

- Bulkhead assembly, 

- Transceiver cable, 

- and transceiver ( H4000 ). 
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SEQ 0004 
NQNAL CNONAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 Page 4 
v01.0 GLOBAL DEFINITION MODULE 9-Jul-1984 07:06:36 SPIDERSUSERS: (BE GDEGNA JNONAL. BLI;2 (4) 
; € 0130 1 1.3 RELATED DOCUMENTS AND STANDARDS 
|S IER cscs Certegy 
C¢ 0133 1 XDP+ Supervisor/User’s Manual - ( CHQUS ). 
; C 0134 1 
; € 0135 1 
; C 0136 1 1.4 ASSUMPTIONS 
7; . 2 Se. 
; € 01358 1 
; € 0139 1 It is assumed that the system has been tested without DEQNA and found 
; € 0140 1 working before this di tic is run, or that NEQNA DEC/X11 
; € 0141 1 Exerciser has dropped DEQNA option module when running system test. 
; C 0142 1 
; € 01435 1 
; C 0144 1 2.0 OPERATING INSTRUCTIONS 
5, € G8 8b  . = = = = ‘Steaeenessecesesonesese 
; C 0146 1 
; C 0147 1 This section contains a brief description of the runtime services. 
; : oes : for detailed information, refer to the XXDP+ User's Manual (C Bs 
: 
; € 0150 1 
; C 0151 1 2.1 COMMANDS 
< 2 Te 
; C 0153 1 
; C 0154 1 There are eleven legal commands for the diagnostic runtime services 
; € 0155 1 (supervisor). This section lists the commands and gives a very 
: : yar : brief description of them. The XXDP+ User's Manuel has more details. 
3 
; C 0158 1 COMMAND EFFECT 
3; C0189 1  & ©} = = wmeeeee etm mmc ewe econo wcrcnccencsce= 
; € 0160 1 
; € 0161 1 START Start the diagnostic from an initial state 
; € 0162 1 RESTART Ster* the diagnostic without beget k 
; € 0163 1 CONT INUE Continue at test thet was interrupted (after tC) 
; C 0164 i PROCEED Continue from an error halt 
; € 0165 1 EXIT Return to XXOP « monitor (XXDP+ operation only!) 
; C 0166 1 Activate a unit for testing Call units are 
; C 0167 1 considered to be active at start time 
; € 0168 1 Deactivate ea unit 
; C 0169 1 PRINT Print statistical information Cif implemented 
; € 0170 1 by the diagnostic - section 4.0) 
; © 0171 1 DISPLAY ee a list of all device information 
; C 0172 1 FLAGS Le the state of ell fl (see section 2.3) 
$ ris : ZFLAGS Clear all flags (see section 2.3) 
$ 
; € 0175 1 A command can be recognized by the first three cheracters. 
; € 0176 1 So you may, for example, type “STA” instead of “START”. 





Fi 


printed after each 100 passes only. 


A Switch can be recognized the first three characters. You 
may, for exemple, type “/TES:1-5S” instead of “/TESTS:1-5”. 


SEQ 0005 
NQNA1 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 "pean 5 
v01.0 GLOBAL DEFINITION MODULE 9-Jul-1984 07:06:36 SPIDERSUSERS ; (BERG. DEQNA JNQNA1 .BLI;2 (5) 
; C 0177 1 2.2 SWITCHES 
| RR oe 
; € 0179 1 
; € 0180 1 There are several switches which ere used to modify supervisor 
; € 01861 1 operation. These switches are appended to the legal commands. 
; € 0182 1 All of the legal switches are tebulaeted below with a brief 
; € 0183 1 description of each. In the descriptions below, a decimal number 
3; C = : is designated by “DDDDD". 
; C 018 
; € 0186 1 SWITCH EFFECT 
a Sn i mt stn sue i nan ie nmi mad 
; €C 0186 1 ve 
; C 0189 1 /TESTS:LIST Execute only those tests specified in 
; € 0190 1 the list. List is e stri of test 
; € 0191 1 numbers, for exemple - /TE €818:1:5:7 -10. 
; € 0192 1 This list will ceuse tests 1,5,7 ge to 
; € 0193 1 be run. All other tests will no run. 
; € 0194 1 /PASS:DDDDD Execute DDDDD passes (DDDDD = i to 74000) 
; € 0195 1 /FLAGS:FLGS Set .peci fied — flegs ere described 
; €C 0196 1 in section 2. 
; € 0197 1 /EOP :DDDDD Report end of poss wi efter ever 
; € 0198 1 ODDDD ov: = 1 to ) 
; € 0199 1 /UNITS:LIST TEST/ADD/DROP 0 only those units ified 
; € 0200 1 in the list. List example - ™7§:0:5:10-12 
; : 0201 : use units 0,5,10,11.12 Cunit numbers = 0-63) 
3 0202 
; C 0203 1 Example of switch usage: 
; C 0204 i 
3 : prong : START/TESTS:1-5/PASS: 1000/E0P: 100 
3 
; C 0207 1 The effect of this command will be: 
; C 0208 1 
; C 0209 1 1. Tests 1 th 5 will be executed. 
; € 0210 1 2. All units w po be tested 1000 times. 
3 z 0211 : 3. The end a pass messages will be 
3 
; C i 
; C 1 
3; C 1 
; C 1 
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SEQ 0006 
12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 Page 6 
a GLOBAL. DEFINITION. MODULE _ 9-Jul-1984 07:06:36  SPIDERSUSERS: (BERG.DEQNAJNQNA1.BLI;2 (6) 


Below is e table that specifies which switches can be used by 


C 0218 each command. 

c 0220 TESTS PASS F!AGS EOP ; UNITS 
¢ Sen —-s . 4 
C 0223 RESTART xX x x x 

C 0224 CONTINUE x : x 

C 6226 - 
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have evaluation support ) 
*serror messages sre described in section 3.0 
See the XXDP+ User's Manual for more details on flags. You may 
specify more than one hay Bo with the flag switch. For example, 
to cause the program to on error, inhibit error reports 
and type e “BELL” onerror, you may use the following string: 


/FLAGS:LOE: IER: BOE 


SE 7 
NQNA1 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 “aoe 7 
v01.0 GLOBAL DEFINITION MODULE 99-Jul-1984 07:06:36 SPIDERSUSERS : (BERG. DEQNA JNQNA1 .BLI;2 (7) 
; C 0233 1 2.3 FLAGS 
‘0 
; € 0235 1 
; C 0236 1 Flegs are used to set up certain operational pereameters such as 
; C 0237 1 looping onerror. All flags are cleared at startup and remain 
; C 0238 1 cleared until explicitly set using the flags switch. Flags 
; C 0239 1 ere also cleared after ea start command ~-~y set using the 
; € 0240 1 flag switch. The ZFLAGS command may also be used to clear 
; C 0241 1 ell flags. with the exception of the START and ZFLAGS commands, 
; C 0242 1 No commands affect the state of the flags: "Te remain set or 
; € 0243 1 cleared as specified by the last flag switch. 
; C 0244 1 
; C 0245 1 FLAG EFFECT 
; C 0246 1 ese = =—=«— ss SSS MOS SC SRSSEseeleSsesCooeree® 
; C 0247 1 
; C 0248 1 HOE Healt on error - control is returned to 
; C 0249 1 runtime services command mode 
; C 0250 1 LOE Loop on error 
; C 0251 1 IER*e Inhibit all error reports 
; C 0252 1 IBRe Inhibit ell error reports except first 
; C 0253 1 level (first level conteins error type, 
: C 0254 1 number, PC. test and unit) 
; € 0255 1 IxXRe Inhibit extended error reports (those 
; C 0256 1 celled by PRINTX macro’s) 
; C 0257 1 PRI Direct messages to line printer 
; C 0258 1 PNT Print test number as test executes 
; C 0259 1 BOE "BELL” on error 
; C 0260 1 UAM Unattended mode (no manual intervention) 
; C 0261 1 ISR Inhibit stetistical reports (does not apply 
; C 0262 1 to diagnostics which do not support stetis- 
; C 0263 1 tical reporting) 
; C 0264 1 IOR Inhibit ale ligt iia of units 
; C 0265 1 ADR Execute autodrop code 
; C 0266 1 LOT Loop on test 
$ : 0267 : EVL Execute evaluation (on diagnostics which 
3 
3; C 1 
3 € 1 
3; C i 
3; C 1 
3; C 1 
+ 1 
3; C 1 
3; C 1 
;s 1 
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NQNA1 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Blise-16 V4.0-579 wg 
v01.0 GLOBAL DEFINITION MODULE 9-Jul-1984 07:06:36 SPIDERSUSERS : {BERG.DEQNA JNQNA1 .BLI;2 (8) 
; C 0278 1 2.4 HARDWARE QUESTIONS 

eae 2. S| lUe”6—lUlUlll).l Canes ees 

; C 0260 1 pe 

; C 0261 1 When a diagnostic is started, the DRS prompts the user for hardware 

; C 0282 1 information by displaying 

; C 0283 1 

; C 0284 1 “CHANGE HW (L) ?” 

; C 0285 1 

; C 0286 1 you must answer “Y" after e start command unless the hardware 

; C 0287 1 information has been “preloaded” using the Setup Utility (see chapter 
; C 0288 1 6 of the XXDP+ User's Manual). When you answer this question with e 

; C 0289 1 “Y". the ORS asks for the number of units. You will then be asked the 
; C 0290 1 following questions for each unit. 

; € 0291 1 

; C 0292 1 ¢ OF DEVICES (D) ? 

; C 0293 1 

; C 0294 1 Answer with the number of units to be tested (no default). This answer 
; C 0295 1 will determine how many times the following questions ere asked. 

; ; — : One (1) device must be specified. 

3 

3 : 0298 : DEQNA I/0 PAGE ADR (0) 174440 ? 

; C 0299 

; C 0300 1 Answer with the address of the I/0 page register assigned for one 

; C 0301 1 of the DEQNA devices. The I/0 page addresses permited are: 174440 

; C 0302 1 and 174460. 

; C 0303 1 

; 2 oa : INTERRUPT VECTOR ADR (0) 300 ? 

3 

; C 0306 1 Answer with the interrupt vector address of the DEGQNA module. 

; C 0307 1 Interrupt vector address for device at I/0 page address 174440 is 300 
3 : pane : oct. and thet for 1/0 page address of 174460 is 504 oct. 

$ 

: € 0310 1 
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2.5 SOFTWARE QUESTIONS 


After you have answered the hardware questions or after a RESTART or 
CONTINUE command, the DRS asks for software parameters. These 
parameters govern some diagnostic specific operation modes. You will 
be prompted by 


CHANGE SW (L) ? 


if you wish to change any parameters, answer by typing “Y”. The 
software questions and the default values are described in the next 


paragraph(s). 
EXTERNAL LOOPBACK MODE (L)? 


Answer with “Y" if you want to execute include “TEST 7” in the test 
e. "TEST 7" its the only test that uses external loopback mode. 


sequenc 
“N” inhibits execution of “TEST 7”. 
SYSTEM HAS BLOCK-MODE MEMORY (L)? 


Answer with "Y" if the system has block-mode memory and “N” if 
it has non block-mode memory. 


IS LOOPBACK CONNECTOR IN DEQNA (L)? 


peg with “Y" if loopback connector is in the back of the DEQNA 
module. 


12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 age 
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SEQ, 0010 
12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 10 
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2.6 QUICK START-UP PROCEDURE (XXDP+) 


To start-up this program: 
Boot XXDP-+ 
Give the date 


Type “R Name”, where Name is the name of the BIN file for 
this program 


Type “START” 

Answer the “CHANGE HW" question with "Y” 

Answer all the hardware questions 

Answer the “CHANGE SW” question with “Y" 

Answer all the software questions 

When you follow this procedure you will be using only the defaults for 


flags and software parameters. These defaults ere described in the 
previous sections. 
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vo1.0 GLOBAL DEFINITION MODULE 
3.0 ERROR INFORMATION 


There are three levels of error messages that may be issued by 

e diagnostic: general, basic and extended. rel error messages 
are always printed unless the IBE and/or IER flag is set. The general 
error message is of the form: 


NAME ER_TYPE ER_NO UNIT_NO TEST_NO PC_ADDR 


»where; 


NAME = gy oe name 

ER_TYPE = Error type ( all errors are HARD ) 
ER_NO = Error number 

UNIT_NO = O 

TEST_NO = Test and subtest where error occurred 
PC_ADDR = Program Counter contents 


Basic error messages are messages that contain some additional 
information about the error. re et always oy unless one or 


0391 more of the DRS error flag(s) . IxX€, I is set. T 

pon messages are printed before the essociated general message. 

0394 Extended error messages contain supplementary error information such 
0395 as register contents or good/bad data. These are al printed unless 
0396 the IXE and/or IER fleg is set. These ere printed after the 
0397 associated general error message and any associated basic error 

0398 messages. A typical extended error message might have a following 
0399 format: 

sa 

<= TRANSMIT DESCRIPTOR LIST RECEIVE DESCRIPTOR LIST 
0404 Fl Flag Word 

0405 Low Order Addr Bits Low Order Addr Bits 


VAX-11 Bliss-16 V4,0-579 
SPIDERSUSERS : (BERG .DEQNA JNQNA1 .BLI;2 


OOONOOOONOANAONAAAAOAAOOOOAOAIAAAANAANAAAAAAAAAAAADANHD 
3 
Oo 

Pe ee Be tee be ae ae Be bee he fm ee he ee bt fe ee ee be fee ee he fee be be fet be Be fe ee ee be fe Be eb be pe pe 


gh 
Packet Length (byte) 
Status Word 1 
Status Word 2 


Status Word 2 


SEQ 001 
Page 


1 
il 
(11) 
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NQNA1 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05  VAX-11 Bliss-16 V4.0-579 se i 
v01.0 GLOBAL DEFINITION MODULE 9-Jul-1984 07:06:36 SPIDER SUSERS : (BERG .DEGNA)NQNA1.BLI; 2 0 12) 
; C 0411 1 SPECIFIC ERROR MESSAGES 
ta 2 lll CL) ee oeneeenensenessee 
; € 0415 1 . : 
; € 0414 1 The following are possible error messages. 
c 0415 1 
;€ 0416 1 DEGNA FATAL ERROR DETECTED 
; C 0417 1 ACTUAL DATA = octal number EXPECTED DATA = octal number 
; C 0418 1 BAD CSR: ACT = octal number EXP = octal number 
; € 0419 1 BAD TRANSMIT FLAG WORD: ACT = octal number EXP = octal number 
; C 0420 1 BAD TRANSMIT STATUS WORD 1: ACT = octal number EXP = octal number 
; C 0421 1 BAD RECEIVE FLAG WORD: ACT = octal number EXP = octal number 
; C 0422 1 BAD RECEIVE STATUS WORD 1: ACT = octal number EXP = octel number 
; C 0423 1 BAD RECEIVE ee Semaarvete ACT = octal number EXP = octal number 
; C 0424 1 BAD CSR = octel numbe 
; € 0425 1 LOOPBACK PACKET UNABLE TO SET CA BIT. CSR = octal number 
; C 0426 1 LOOPBACK PACKET UNABLE TO CLEAR CA BIT, CSR = octel number 
; C 0427 1 CA BIT OK, BUT RI BIT IS NOT ON, CSR = "octal number 
; C 0428 1 CA BIT IN THE CSR WAS SET TOO EARLY, CSR = octel number 
; €¢ 0429 1 BAD CSR, EXPECTED, XL AND RL ( BITS 4.5 ) TO BE RESET TO 0 
; € 04350 1 BAD CSR, EXPECTED, XL AND RL ( BITS 4,5 ) TO BE SET TO 1 
; C 0431 1 BAD CSR, EXPECTED, RI ( BIT 15 ) TO BE SET 1 
; C 0432 1 BAD CSR, EXPECTED, XI ( BIT 7 ) TO BE SET TO 1 
; C 0433 1 BAD , EXPECTED, NI € BIT 2 ) TG BE SET TO 1 
: : oe : BAD CSR, EXPECTED, NI ( BIT 2 ) TO BE RESET TO O 
; ~ 
; C 0436 1 CSR ADR = octel number ACTUAL = octel number EXPECTED = octel number 
; C 0437 1 UNABLE TO RESET DEQNA: ADR: address CSR = octal number 
; C 04 1 WAIT ABOUT number SECOND(S) 
; C 0439 1 DISCONNECT TRANSCEIVER CABLE FROM BULKHEAD ASSEMBLY AND CONNECT 
; C 0440 1 LOOPBACK CONNECTOR TO BULKHEAD ASSEMBLY, THEN RETEST 
; C 0441 1 DISCONNECT BULKHEAD ASSEMBLY FROM DEGNA AND CONNECT 
; C 0442 1 LOOPBACK CONNECTOR TO DEQNA, THEN RETEST 
; C 0443 1 CHECK FOR LOOSE WIRES IN A LOOPBACK CONNECTOR OR USE DIFFERENT 
; C 0444 1 LOOPBACK CONNECTOR, THEN RETEST 
; C 0445 1 REPLACE DEQNA, THEN T 
+ € 0446 1 REPLACE BULKHEAD CONNECTOR, THEN RETEST 
; C 0447 1 DISCONNECT TRANSCEIYER CABLE FROM yo ae AND CONNECT IT TO 
; C 0448 1 LOOPBACK CONNECTOR AND BULKHEAD ASSEMBLY 
; C 0449 1 REPLACE TRANSCEIVER CABLE, THEN RETEST 
; C 0450 1 REPLACE TRANSCEIVER, THEN RETEST 
; C 0451 1 REPLACE THE FUSE IF BAD, THEN RETEST 
; C 0452 1 BAD RECEIVE DESCRIPTOR: 
; C 0453 1 BAD TRANSMIT DESCRIPTOR: 
; C 0454 1 BAD - wy BUFFER: 
; C 0455 1 ACTUAL = teal number EXPECTED = octal number INDEX = decimal number 
; C 0456 1 DMA OPERATION TAKES TOO LONG 
; C 0457 1 TOO MANY DEVICES 
; C 0458 1 THERE WAS A POWER FAIL - WAITING 
; C 0459 1 WAIT ABOUT decimal number MINUTE(S) 
; C 0460 1 WAIT ABOUT decimal number HOUR 
; C 0461 1 IF NO RESET, oT yPE ANY CHARACTER TO EXIT FROM TEST 
; C 0462 1 TOR VALUE = OsN’), 
; C 04635 1 BAD CSR, BITS S STUCK AT O: 


Ni 


SEG a 
12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 13 
01-6 CNOA DEFINITION MODULE — 9-Jul-1984 07:06:36 SPIDERSUSERS : [BERG . DEQNA JNQNA1. eLI:2 12) 


. BITS STUCK AT 1 
SOF THARE RESET UNABLE. TO TO ‘CLEAR CSR STATIC BITS: 


BAD STATION ADDRESS CHECKSUM: ACT = octal number EXP = octal number 
BAD STATION ADDRESS: station address 
BAD DEQNA I/0 PAGE REGISTER: register address 


, TED RL ( BIT S ) TO BE SET T0 0 
BAD 5/0 PROM CHECKSUM: INDEX = octal number ACT = octal number EXP = octal number 


PROM FSET = octel number ACT = octal number EXP = octal number 
A er, MOR = pois number ACT LEV = octel number EXP LEV = octal number 


TERRUPT: ADR = 
REGISTER FAILED TO RESPOND AT ADDRESS: register address 
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4.0 TEST SUMMARIES 


Be 


12-Jul-1984 13:03:05 
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SEQ 0014 


VAX-11 Bliss-16 V4.0-579 
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Each test hes its own test summary; therefore, test summaries are not 


included here. 
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SEQ 0015 


T 12-Jul-1984 13:03:05 VAX-11 Bliss-16 v4.0-579 
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5.0 MODIFICATION HISTORY 


=> CNQNA Jaki Ber 9- JUL -84 
ae o made to CZQNAA to i CNQNAA for the FALCON-PLUS project 
(S8C-11/721+). nenges. marked by “;JB REV A-0", are: ; ; 
- Set the ODT BRE capeieeen Le alae 140) to the starting address o 
. T ROM 0000 -octea @ 
- anna oleate from level 7 to level 6 to allow the BREAK key to 


interrupt. ; 
- Change i t vector addresses from 70_ to 50. (i.e. 700*>500), 
Loceee FALCON: only recognizes lines <7:0> of the interrupt address. 
- Took out Sanity Timer test, as FALCON+ operates ir Power up mode 2 only, 
therefore has no restart after power-feail. 


s 
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DEQNA FUNCTIONAL TEST 


CNQNAAO 
GLOBAL DEFINITION MODULE 


LIBRARY ‘QNALIB’; 
REQUIRE ‘BLSMAC.REQ’; 


PSECT 
CODE = AASCODES; 


LITERAL 
DSSNBR_OF _TESTS = 20; 


EQUALS; 
POINTER CALL); 


HEADER (s#ASCII'CNQNA * ,SASCII‘A‘ ,SASCII‘'O’, 120, 0, PRIOO); 


+ 
a 


NO POINTERS ARE OPTIONAL USING BLISS. MAKE SURE 
SECTIONS OF CODE ARE IN PLACE CIN THE CORRECT SKELS).EVEN IF 
THE SECTIONS ARE BLANK. 


ARGUMENT FUNCTION 
RPT 
SW 
DROP 
TBL ERROR TABLE 


SETUP ASSEMBLED P-TABLES 


CHANGE THE “HEADER” TO CONTAIN THE PROPER ARGUMEN 
ARGUMENTS ARE: NAME ,REV,PATCH,LONGEST TEST TIME , TYPE 
WHERE “TYPE” = © FOR SEQUENTIAL DIAGNOSTIC AND = 

FOR EXERCISER. THERE IS 
WHICH SPECIFIES THE PROCESSOR PRIORITY TO BE SET 
STARTING THE DIAGNOSTIC (DEFAULT IS 0). 


e 


; = sO EFINE THE NUMBER OF TESTS IN 


REPORT C 

SOFTWARE TABLE 

SFT SOFTWARE TABLE QUESTIONS 
AU ADD CODE 


De 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


! DIAGNOSTIC SUPERVISOR LIBRARY 


THIS OIAGNOSTIC 


THE PROGRAM HEADER IS THE INTERFACE BETWEEN THE DIAGNOSTIC PROGRAM 
AND THE SUPERVISOR. 


ALSO AN OPTIONAL SIXTH "ARGUMENT 


VAX-11 Bliss-16 V4.0-579 P 
SPIDERSUSERS : [BERG. DEGNA JNQNA1 .BLI;2 


THE FOLLOWING 


SEQ 0016 
ege 16 
(15) 
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Ee 


SEQ 0017 


QNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 


CNQNAAO DE Pp 
DISPATCH TABLE 99-Jul-1984 07:06:36 SPIDER SUSERS : [BERG . DEQNA JNQNA1 .BLI;2 


SSBTTL ‘DISPATCH TABLE’ 
DISPATCH (DS$NBR_OF TESTS); 


> 
o 


THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 
IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 


CHANGE THE LITERAL DECLARATION OF DSS$NBR_OF_TESTS TO BE 
THE NUMBER OF HARDWARE TESTS IN YOUR PROGRAM. 


3 
f 


> 
© 


THE ERRTBL MACRO IS re gh WHETHER OR NOT YOU REPORT ~ —* 
THE “ERROR” MACRO. THE ERRTBL MACRO EXPANDS INTO FOUR WORDS T 
ARE USED BY THE RUNTIME SERVICES DURING AN ERROR CALL: ERROR TYPE, 
ERROR NUMBER, ADDRESS OF ERROR MESSAGE AND ADDRESS OF MESSAGE 

THERE MUST BE ONLY ONE ERRTBL IN ANY PROGRAM. THIS SECTION 


BLOCK. 
IS NOT OPTIONAL. 


ege 17 
(16) 
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Fe 
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GLOBAL DATA SECTION 9-Jul-1984 07:06:36  SPIDERSUSERS:(BERG.DEQNA)NQNAL. BLI;2. e617) 
SSBTTL ‘GLOBAL DATA SECTION’ 
PSECT 
PLIT = $PLITS, 


OwN = SOWNS, 
GLOBAL = $GLOB$; 






q 
' THE GLOBAL DATA DEFINED IN THIS SECTION IS USED BY MORE THAN ONE 
4 
& TEST. 
GLOBAL 
See 
‘ COMMUNICATION AREA DECLARATIONS 
De 
RCV_D_LIST : D_SIZE, WORD } FIELD ( OL_FIELDS ), 
XMIT_O_LIST : 0_SI FIELD ( DL_FIELDS ), 
v_BUFFER : B_S 3 
XMIT_BUFFER : B.S 
PHYS _ADR : 22 
SE TUP_BUFFER : SE 
10P_ TABLE : 8, 
ETH_STATION_ADR : 6, 
STATION_ADR : 4, WORD RO }. 
PTRN_TABLE : 8, BYTE } INITIAL ( BYTE ¢ 





$6 *, 88'11111111', #8'10101010', #8°01010101', 
#8'11001100', #B8'00110011', #8°11110000’, #8°00001111°)). 





Ge 


NQNA1L CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 v4.0-579 = a 19 
v01.0 GLOBAL DATA SECTION 99-Jul-1984 07:06:36 SPIDER SUSERS : (BERG .DEQNA JNQNA1. eLI;2° er 18) 
; 2095 1 TARGET _ADR : VECTOR { T_SIZE, BYTE }) INITIAL ( BYTE ¢ 

; 2094 1 

; 2095 1 sX'00', SX'OO’, #X‘'00', SX‘'00', BX‘'00', #X‘00', ! 1 - MEMORY PATTERN 

> 20% 1 @x'SS’, @x'SS', #x'55', #x'S5', #x'SS', #X'S5S’, . 2 

; 2097 1 @X'AA', SX'AA', @X'AA’', SX'AA’', BX'AA’, BX'AA', ! 3 - MEMORY PATTERN 

; e098 1 @x‘S5', @X'55’, 8X'S5S', SX'SS', BX'SS’, SX‘SS', ! 4 - MEMORY PATTERN 

; 2099 1 OX'FF*, SX'FF', GX'FF', GX'FF', SX‘'FF', SX'FF’, ! S - MEMORY PATTERN 

; 2100 1 “x'OOo’. ex‘'Fa‘, ex'FA’, ax‘'44', ax'44', ex''s', ‘ & 

; 2101 1 mxX'AR’, @X‘OO’, BX‘'OO', BX‘'OO', BX'OO', BX‘00', ' 7 - MEMORY PATTERN 

; 2102 1 ax’ AA’, #x'0OO',. #@x'O2', eX'AA', ex‘ AA’, @x'AA', ‘ BL 

; 2103 1 SX‘ AA’, 6X‘'0O', SX'O5’, SX'SS’, #X'SS', SX'5S’, : 9 

; 2104 1 SX' AAR’, BX'OO', SX'O4', SX'FF', SX'FF’, SX'FF’, ! 10 

; 2105 1 SX' AA’, BX'OO', SX'O4', SX'OO', BX'00’, BX'00', ! 11 - LOW ETHERNET ADR 
:; 2106 1 SX'AA', BX'OO', BX'O4', BX'16', BX'B1', BX‘'18', ! 12 - HIGH ETHERNET ADR 
; 2107 1 @xX‘O1', 8X°OO’, SX‘0O', SX'OO', SX'00', SX‘00', $13 - ALL MULTICAST 

» o208 i SX‘ AB’, SX'AR', SX'AA’, SX'AA’, SX‘AA’, SX'AA’, ! 14 - ALL MULTICAST 

; 2109 1 SX'FF’, @X°OO', SX'O1', BX‘'O2’, BX‘'OS', BX‘'O4', ! 15 - ALL MULTICAST 

; 2110 1 #x'SS', 8xX'OS', #X‘'06', @X'O7’, 8X'OB8’, BX‘'O9', ! 16 - ALL MULTICAST 

; e2il1 1 SX'CD', 8X‘36’, SX'26', BX'27', BX'27', BX'49', $ 17 

: 2ll2 1 @X'33', SX'Al’, SX‘'67', SX‘'BB’. SX'4C’, BX'SF', : 16 

; 2113 1 Sx'EB’, SX'BE‘, SX‘C7*, SX'GF’, BX'S3', SX'FF’, ! 19 

: 2114 1 OX'FF’, @xX'FF', @X'FF', @X'FF’, @X'FF', @xX'FF’ 9), $$ 20 - STATION ADOR 














He 
SEG Ay 
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v01.0 GLOBAL DATA SECTION 9-Jul-1984 07:06:36 SPIDERSUSERS : [BERG.DEQNA JNOQNA1. eL1;2 oe" 19) 

2115 1 
; 2186 1 BD_PROM_DESCR =: VECTOR [ BD.0_SIZE, WORD } INITIAL ( WORD ( 

2117 1 
» 5218 1 NEWB, ! BUFFER NOT USED IF 1 
; 2119 1 Vv. ! VALIO ADDRESS IF 1 
3 2120 1 RCV_BUFFER, ' RCV FER ADDRESS 
» fae 3 BYTE _COUNT, ! 1/4 THE BYTE COUNT 
: 2il2z2e 1 0, ¢ STATUS WORD 1 
: 2123 1 0. § STATUS WORD 2 
3 2124 1 
; 2i2es 1 NEWB, * BUFFER NOT USED IF 1 
: 2126 1 V. ! VALID ADDRESS IF i 
: 2i27 1 XMIT_BUFFER, ' XMIT BUFFER ADDRESS 
3 2126 1 BYTE COUNT, ' 1/4 THE BYTE COUNT 
; 2129 1 ° § STATUS WORD 1 
3 2130 1 ° § STATUS WORD 2 
3 2131 1 
: 2132 1 NEWB, ' BUFFER NOT USED IF 1 
: 2133 1 ° § VALID ADDRESS IF i 
3 21sé@ 1 0. * 2 EXTRA WORDS 
3 2135 1 0 )). : 
3 2136 i 
3 2137 1 
; 2138 1 TO16: VECTOR { 44, WORD }] INITIAL ( WORD ( 
s 
; 2140 1 NEWB. VL ° XMIT_BUFFER . -1 . 0, oO, $ 1 BYTE DESCRIPTOR 
3 214i 1 NEWS, VHL, XMIT_BUFFER - “2. 9, O, : 
Q 2142 1 NEWS. Ve es XMIT_BUFFER * e a -1 © 0, e H 
; 2143 1 WB. VE , XMIT_BUFFER «+ 4 - 71. 0, 0, $ 
3 2144 |i Ww. E ., XMIT_D_LIST + 60 » “1, Oo OO, ' END 
* 2145 l Ww. YW . XMIT_D_LIST ® 56 * -2 ° 0. ’ : 4 BYTE DESCRIPTOR 
. 2146 1 NEWB, vE ° Mi « 114 Py -3 Py oO, ° ' 6 BYTE DESCRIPTOR 
3 ped : NEWS. E )). ! END OF DESCRIPTOR 
3 
3 ooo. : TD013: VECTOR { 34, WORD ] INITIAL ( WORD ( 
8 
3 2151 1 NEWS. V ,. XMIT_BUFFER eo eh « OD OD, ! 2 BYTE DESCRIPTOR 
s 2152 1 Wa. Vs. XMIT_BUFFER «+ 2 e-l27 , Oo. QO, ! 378 BYTE DESCRIPTOR 
3 2153 1 NEWS. V , XMIT_BUFFER + 256 » sh -« O GD, g BYTE DESCRIP 
3 2154 1 WB. C , XMIT_O_LIST + 48 » “kh. O O- § CHAIN DESCRIPTOR 
; 2155 1 ’ vE . XMIT “BUFFER + 258 . -63 a , 0, :2 BYTE DESCRIPTOR 
3 erat : ~ Be abe * END OF DESCRIPTOR 
3 
3 tt 4 : RD13: VECTOR { 64, WORD ) INITIAL ( WORD ( 
3 
5 2160 1 NEWS. V . RCV_BUFFER » 72 . OD, ' 2 BYTE DESCRIPTOR 
3 2161 i NEWS. V , RCV_BUFFER + 2 » 62, 90, 0, ' 124 BYTE DESCRIPTOR 
3 2162 1 NEWS. V ,. RCV_BUFFER + 126 » +h « O. Ve ' 2 BYTE DESCRIPTOR 
3 2163 1 WB. V , RCV_BUFFER + 128 » 8 « Oe Ve ! 4 BYTE DESCRIPTOR 
s 2164 1 NEWS. V , RCV_BUFFER + 132 - “60, O, O, § 120 BYTE DESCRIPTOR 
3 2165 1 NEWB, V , RCV_BUFFER + 252 o “2 » DO Oe : 4 BYTE DESCRIPTOR 
3 2166 1 WB, VC , RCV_D_LIST + 84 » “2. Oo VO. ! CHAIN DESCRIPTOR 
5 2167 1} NEWS, V , RCV_BUFFER +» 256 o “3 »« O YD, ' 6 BYTE DESCRIPTOR 


+4 oo eee 


CNQNAAO DEQNA FUNCTIONAL TEST 
GLOBAL DATA SECTION 


Vv, RCV_BUFFER + 262 


le 


12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 
99-Jul-1984 07:06:36 SPIDERSUSERS : (BERG. DEQNA JNQNA1 .BLI;2 


-60 & 0, 0, 


-1 ,90 


SEQ 0021 


120 BYTE DESCRIPTOR 
2 BYTE DESCRIPTOR 
END OF DESCRIPTOR 


Pege 21 
(19) 


ee 

S§ 

~ 
~ 
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See 
' HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS 
o «-e 

HWP_TABLE : REF BLOCK [ HWP_SIZE, WORD ) FIELD ( HwP_FIELDS ), 

Swe TABLE : REF BLOCK ( SWP_SIZE, WORD } FIELD ( SWP_FIELDS ), 


REG_ADR : REF REG_STR FIELO ( IOP_FIELDS ), 
IOP _DATA : REF REG_STR FIELD ( IOP_FIELOS ), 
GET_ADR : REF ADR_STR FIELO ( IOP_FIELDS ), 


MISCELLANEOUS DATA DECLARATIONS 











XBUF _LENGTH : WORD, ! XMIT BUFFER LENGTH IN WORDS 
_LENGTH : WORD, ! RCV GUFFER LENGTH IN BYTES 
INTERRUPT _FLG : WORD, ! 1 = INTERRUPT OCCURED 
DEGNA _NO : WORD, ! DEQGNA UNDER TEST THIS PASS 
COUNTER : WORD, : TION COUNTER, INDEX 
UP _COUNTER : WORD, : 
DOWN_COUNTER :; WORD, ? 
CKSUM : WORD, t EXPE CKSUM 
BUF _LENGTH : WORD, ! XMIT BUFFER SIZE IN WORDS 
_WORD ; WORD, : 
XC_FLAG : WORD INITIAL (0), 2 
a : WORD INITIAL (0), 8 
ERR _FLAG : WORD INITIAL (0), : 
ERR_COUNT : WORD INITIAL (0), $ 


Ke 
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; 2204 1 See 

3 2205 1 : 

3 2206 1 : TEMPORARY STORAGE DATA DECLARATIONS 

; 2207 1 8 

3 2208 1 $.- 

3 2209 1 

3 2210 1 TMP _IOP_ADR : WORD, ! I/O PAGE REGISTER ADDRESS 
: 2211 1 TMP_REG_DATA : WORD, ! I/0 PAGE REG CONTENTS 

3 22i2 1 TEMP1 : WORD, ' Té Y STORAGE LOCATION 
: 2213 1 TEMP2 : WORD, ' TEMPORARY STORAGE LOCATION 
3 2214 1 TEMPS : WORD, ' TEMPORARY STORAGE LOCATION 
3 2215 1 TEMP4 : WORD, § TEMPORARY STORAGE LOCATION 
8 2216 1 TEMPS : WORD, : S STORAGE LOCATION 
8 2217 1 TEMP6 : WORD, ! TEMPORARY STORAGE LOCATION 
3 2218 1 TEMP7 : WORD, ' TEMPORARY STORAGE LOCATION 
3 2219 1 TEMPS : WORD, § TEMPORARY STORAGE LOCATION 
3 2220 1 TEMPS : WORD, § TEMPORARY STORAGE LOCATION 
: 2221 1 Pl : WORD, ! PARAMETER @1 

; 2222 1 Ped : WORD, ' PARAMETER 

3 2223 1 Ps : WORD, $ PARAMETER 63 

3 2224 1 P4 : WORD, ! PARAMETER 04 

3 2225 1 PS : WORD, $ PARAMETER 05 

3 2226 1 TBYTE1 : BYTE, : 

3 2227 1 TBYTE2 : BYTE, : 

3 2228 1 TBYTES : BYTE, : 

3 2229 1 TBYTE4 : BYTE, H 

: 2230 1 TADR1 : WORD, : 

3 2231 1 TADR2 : WORD; : 

3 2232 1 





Le 


SE 4 
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vo1.0 GLOBAL DATA SECTION 9-Jul-1984 07:06:36  SPIDERSUSERS:(BERG.DEGNAJNQNA1.BLI;2 (22) 








3 2233 1 

3 2234 1 *SBTTL ‘GLOBAL TEXT SECTION’ 

; 62237 1 : THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, MESSAGES, 

3 2238 1 g AND ASCII INFORMATION THAT IS USED IN MORE THAN ONE TEST. 

: 2239 1 $.- 

; 2240 1 

3 2241 1 GLOBAL BIND 

3 2242 1 

3 2243 1 DESCR_LIST = RCV_O_LIST, 

> 2244 1 DATA_BUFFER = RCV_BUFFER, 

3 2245 1 

; 2246 1 fee 

3 2247 1 ® HARDWARE AND SOFTWARE QUESTIONS 

3 2248 1 $.. 

3 2249 1 

3 2250 i QSTO1 = UPLIT (#ASCIZ’DEQNA I/0 PAGE ADR *>, 

: 2251 1 Q@STO2 = UPLIT (#ASCIZ' INTERRUPT VECTOR ADR '‘), 

3 2252 1 QSTO3 = UPLIT (#ASCIZ'DO YOU WANT TO TEST SANITY TIMER ‘), 

8 2253 1 T = UPLIT (#ASCIZ‘IS LOOPBACK CONNECTOR IN DEQNA a» * 

3 2254 1 QSTOS = UPLIT (#ASCIZ‘ SANITY TIMER TIME-OUT VALUE De 

3 2255 1 QSTO6 = UPLIT (#ASCIZ‘' EXTERNAL LOOPBACK MODE ae F 

3 = : QSTO7 = UPLIT (#ASCIZ’' SYSTEM HAS BLOCK-MODE MEMORY Ve 

; 

3 2258 1 

: 2259 1 

: 2260 1 See 

3 2261 1 8 DEVICE ERROR MESSAGES 

s 2262 1 Ses 

; 2263 1 

: 2264 1 MSGOO = UPLIT (sASCIZ' DEQNA FATAL ERROR DETECTED '), 

3 2265 1 MSGO1 = UPLIT (sSASCIZ'SNSNSA DEGNA ADDRESS: #068A, STATION ADDRESS: ‘),. 

s 2266 1 MSGO2 = UPLIT (#ASCIZ'SA ACTUAL DATA = #06s8A EXPECTED DATA = s06eN‘ ). 
; 2267 1 MSGO3 = UPLIT (#ASCIZ‘SA XMIT DESCRIPTOR RCV DESCRIPTOR aN’). 
3 2268 1 MSGO4 = UPLIT (#ASCIZ'S#A FLAG WORD sO68A SO6EN‘ ), 
$ 2269 1 MSGOS = UPLIT (#ASCIZ‘SA HIGH ORDER ADDR BITS 

3 2270 1 MSGO6 = UPLIT (s#ASCIZ‘'SA LOW ORDER ADDR BITS 

s 2271 1 MSGO7 = UPLIT (#ASCIZ'S#A PACKET LENGTH ( WD ) 

3 2272 1 MSGOS = UPLIT (#ASCIZ‘'SA STATUS WORD 1 

3 2273 1 MSGO9 = UPLIT (#ASCIZ‘ SA STATUS WORD 2 

3 2274 i MSG10 = UPLIT (#ASCIZ'S#A DEQNA 7 REGISTER 

3 2275 1 MSG11 = UPLIT (#ASCIZ‘'S#A DEQNA I/0 PAGE ADR 

3 2276 1 MSG12 = UPLIT (#ASCIZ‘#A BAD CSR: act = @068A EXP 

; 2277 1 MSG13 = UPLIT ¢ IZ‘sA BAD TRANSMIT FL : ACT = SO68A EXP = SO6EN 

$ 2278 1 MSG14 = UPLIT (#ASCIZ'#A BAD TRANSMIT STATUS WORD i 

3 2279 1 MSG15 = UPLIT (sASCIZ‘#A BAD RECEIVE FLAG WORD: ACT = S068A EXP = #068N 

; 2280 1 MSG16 = UPLIT (#ASCIZ’'#A BAD RECEIVE STATUS WORD 1: 

; 2261 1 MSG17 = UPLIT (sASCIZ’S#A BAD RECEIVE BUFFER LENGTH: ACT = #068A EXP = sO06eN'), 
; 2282 1 MSG18 = UPLIT (sSASCIZ‘'S#A BAD CSR = 

$ 2283 1 MSG19 = UPLIT (#ASCIZ'#SA LOOPBACK PACKET UNABLE TO SET CA BIT, CSR = S06eN'), 
8 2284 1 MSG20 = UPLIT (#ASCIZ’S#A LOOPBACK PACKET UNABLE TO CLEAR CA BIT, CSR = sO06eN' ), 
3 2285 1 MSG21 = UPLIT (sASCIZ’#A CA BIT OK, BUT RI BIT IS NOT ON, CSR = S068N'), 


Me 
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; 2286 1 MSG22 = UPLIT (sASCIZ'SA CA BIT IN THE CSR WAS SET TOO EARLY, CSR = s06sN’), 

:; 2287 1 MSG23. = UPLIT (sASCIZ'SA XL AND RL ( BITS 4,5 ) TO BE RESET TO OmN’), 

; 2288 1 MSG24 = UPLIT (sASCIZ'#A XL AND RL ( BITS 4,5 ) TO BE SET TO 1sN’), 

; 2289 1 MSG25 = UPLIT (#ASCIZ‘SA RI ( BIT 15 ) TO BE SET TO 1sN‘), 

; 2290 1 MSG26 = UPLIT (sASCIZ‘SA XI ( BIT 7 ) TO BE SET TO 1sN’), 

; 2291 1 MSG27 = UPLIT (#ASCIZ‘'SA NI ( BIT 2 ) TO BE SET TO 18N’), 

; 2292 1 MSG28 = UPLIT (sASCIZ‘SA NI ( BIT 2 ) TO BE RESET TO OnN’), 

; 2293 1 MSG29 = UPLIT (#ASCIZ'#A BAD CSR, EXPECTED’), 

; 229 1 MSG3O0 = UPLIT (sASCIZ'SA CSR ADR = S068A ACTUAL = SO68A EXPECTED = sO6sN‘), 

> oe 3 MSG31 = UPLIT (#ASCIZ‘SNSA UNABLE TO RESET DEQNA: ADR: SO68A CSR = sO6sN’), 

; 22% 1 MSG32 = UPLIT (s#ASCIZ‘sNSA WAIT ABOUT #D28A SECOND(S) -'), 

; 2297 1 MSG33. = UPLIT (#ASCIZ‘SNSA SANITY TIMER TIMED OUT AS EXPECTED sn’), 

; 2298 1 MSG34 = UPLIT (sASCIZ‘sNSA NO SANITY TIMER INTERRUPT DETECTED #N’ ), 

; 2299 1 MSG35 = UPLIT (#ASCIZ‘sNSA DISCONNECT TRANSCEIVER CABLE FROM BULKHEAD ASSEMBLY AND’), 

; 2300 1 MSG36 = UPLIT (sASCIZ'sNSA CONNECT LOOPBACK CONNECTOR TO BULKHEAD ASSEMBLY, THEN RETESTSN’ ), 
; 2301 1 MSG37 = UPLIT (#ASCIZ‘sNSA DISCONNECT BULKHEAD ASSEMBLY FROM DEGNA AND CONNECT’), 

; 2302 1 MSG38 = OOPBACK CONNECTOR TO DEQNA, THEN RETEST#N’ ), 

; 2303 1 MSG39 = (SASCIZ'sNSA CHECK FOR LOOSE WIRES IN A LOOPBACK CONNECTOR’), 

; 2304 1 MSG40 = T (SASCIZ‘sNSA OR USE DIFFERENT LOOPBACK CONNECTOR, THEN RETEST#N’ ), 

; 2305 1 MSG41 = C ACE DEQNA, THEN RETESTS#N’ ), 

; 2306 1 MSG42 = SCIZ REPLACE BULKHEAD CONNECTOR, THEN RETESTxw’ ), 

; 2307 1 MSG43 = UPLIT (#ASCIZ’sN#A DISCONNECT TRANSCEIVER CABLE FROM TRANSCEIVER’ ), 

; 2308 1 MSG44 = UPLIT (s#ASCIZ'sSNSA AND CONNECT IT TO LOOPBACK CONNECTOR AND BULKHEAD ASSEMBL YSN’ ), 
; 2309 1 MSG45 = UPLIT (sASCIZ'SNSA REPLACE TRANSCEIVER CABLE, THEN RETESTSN’ ), 

; 2310 1 MSG46 = UPLIT (sASCIZ'SNSA REPLACE TRANSCEIVER, THEN RETEST#N’ ), 

; 2311 1 MSG47 = UPLIT (s#ASCIZ’SNSA REPLACE THE FUSE IF BAD, THEN RETESTSN’ ), 

; 2312 1 MSG48 = UPLIT (#ASCIZ'SNSA BAD RECEIVE DESCRIPTOR:'), 

; 2313 1 MSG49 = UPLIT (sASCIZ' BAD TRANSMIT DESCRIPTOR: ), 

; 2314 1 MSGSO = UPLIT (sASCIZ‘SA ACTUAL = SO68A EXPECTED = #068A INDEX = sD4sN’), 

; 2315 1 MSGS1 = UPLIT IZ‘sNSA BAD RECEIVE 

; 2316 1 = UPLIT (sASCIZ'SNSA DMA OPERATION TAKES TOO LONGSN’ >, 

; 2317 1 MSGS3 = UPLIT (sASCIZ'sNSA TOO MANY 

; 2318 1 = UPLIT (s#ASCIZ‘'SNSA THERE WAS A POWER FAIL - WAITINGSN’ ), 

; 2319 1 MSGSS = UPLIT (#ASCIZ‘SNSA WAIT ABOUT #D2sA (S$) -'), 

; 2320 1 MSGS6 = UPLIT (sASCIZ‘SNSA WAIT ABOUT #D28A HOUR -'), 

; 2321 1 MSGS7 = UPLIT (sASCIZ‘SA IF NO RESET, TYPE ANY CHARACTER TO EXIT FROM TESTS#N’ ), 

; 2322 1 MSG5S8 = UPLIT (#ASCIZ'SNSA TOR VALUE IS EQUAL TO ZERO #N’), 

; 2323 1 MSGS9 = UPLIT (sASCIZ‘ SNSNSA sn‘), 
; 2324 1 MSG60 = UPLIT (#ASCIZ'sNSA BAD CSR, BITS STUCK AT 0:9N'), 

; 2325 1 MSG61 = UPLIT (sASCIZ‘sSNSA BAD CSR, BITS STUCK AT 1:98N‘), 

; 2326 1 MSG62 = C SOFTWARE RESET UNABLE TO CLEAR CSR STATIC BITS:#N" ). 

; 2327 1 MSG63 = (SASCIZ'SNSA BAD STATION ADDRESS CHECKSUM: ACT = s06sA EXP = sO06siN'), 

; 2328 1 MSG64 = UPLIT (SASCIZ‘sSNSA BAD STATION ADDRESS: '), 

; 2329 1 MSG6S = BAD DEGNA I/O PAGE REGISTER:sN' ). 

; 2330 1 MSG66 = (SASCIZ’SNSA BAD CSR, EXPECTED RL ¢ BIT S ) TO BE SET TO ON’), 

; 2331 1 MSG67 = (SASCIZ’sNSA BAD B/D PROM CHECKSUM: INDEX = s06sA ACT = sO6SA EXP = sO6sN'), 
; 2332 1 MSG68 = SASCIZ’SNSA B/D PROM CHECKSUM OFFSET =» 068A ACT = SO6SA EXP = SO6SN'), 

; 2333 1 MSG69 = UPLIT (sASCIZ’sSNSA BAD INTERRUPT: ADR = s068A act LEV = s06sA EXP LEV = SO6sN'), 

; 2334 1 MSG70 = UPLIT (sASCIZ’SNSA REGISTER FAILED TO RESPOND AT ADDRESS: sO6sN' ), 

; 2335 i MSG71 = UPLIT (#ASCIZ'sNSA BAD TRANSMIT STATUS, TOO MANY COLLISIONS#N’ ); 

. 

s 2337 1 

; 2338 1 


el eel aed eel aol ol aol and aol ond ook ook adh aol ol od oh dd eh te 


N2 


SEQ 0026 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4,0-579 
DEFAULT HARDWARE P-TABLE 9-Jul-1984 07:06:36 SPIDER SUSERS : (BERG . DEQNA JNQNA1 .BLI;2 


SSBTTL ‘DEFAULT HARDWARE P-TABLE' 
BGNHW ( HP_TABLE ); 


+ 
> 


THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF THE 
TEST-DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE IS IDENTICAL TO 
THE STRUCTURE OF THE HARDWARE P-TABLES, AND IS USED AS A “TEMPLATE” 


FOR BUILDING THE P-TABLES. 


PLACE YOUR DEFAULT we P-TABLE HERE. THE VALUES AND 
A “TEMPLATE” FOR CREATING “By P-TABLE 


ENTRIES AND THE DEFAULT VALUES IN THE OPERATOR DI 
THE ACTUAL P-TABLE BUILT AT RUNTIME IS STORED IN SUPERVISOR 


EE 
Ps Ee 
. : 
“hk 


OBAL 
. DFSTB. : BLOCK [ HWP_SIZE, WORD ] INITIAL (€ #0'174440', #0'300’ ); 
NDHW ; 


age 26 
(23) 





< 

36 

~ 
~ 





OO Oe ee be ee be be he be be be be be ee ee Be Oe be pe he ee Be 


B3 


SE 7 
CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 v4.0-579 27 
SOFTWARE P-TABLE 9-Jul-1984 07:06:36  SPIDERSUSERS:(BERG.DEQNAJNQNA1.BLI;2 (24) 


SSBTTL ‘SOFTWARE P-TABLE’ 


> 
e 


THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE 
PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
+ 4 ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 


PLACE YOUR SOFTWARE P-TABLE HERE.USING GLOBAL OR OWN DECLARATIONS 
THIS TABLE IS NOT OPTIONAL. THIS TABLE, UNLIKE THE HARDWARE TABLE, 
WILL CONTAIN THE ACTUAL VALUES ENTERED BY THE OPERATOR. 


BGNSW ( SP_TABLE ); 
GLOBAL 


SwP_TIMER : WORD INITIAL ( NO ), ! NO SANITY TIMER TEST 

ltd : WORD INITIAL ( NO ), ! NO LOOPBACK IN DEQNA 
SwWP_TOUT _VAL : WORD INITIAL ( 3 ), ! TIMEOUT VALUE = 16 SEC. 
SwWP _ILOOP : WORD INITIAL ( NO ), ! EXTERNAL LOOPBACK MODE 
SWP_BLOCK_MEM : WORD INITIAL ( YES ); ! BLOCK-MODE MEMORY PRESENT 


ENOSW; 


eo 


12-Jul-1984 13:03:05 


SEG oes 


DEQNA FUNCTIONAL TEST VAX-11 Bliss-16 V4.0-579 


: 
tw 


So et bt be be bt be be be pe be pe pe pe be be bo be pe pe 


CNQNARO 
PROTECTION TABLE 


SSBTTL ‘PROTECTION TABLE’ 


> 
> 


BGNPROT (-1, -1,. -1); 


ENDPROT ; 


END 
ELUDOM 


116 121 
101 040 


ITEM DOES NO 

SERVICES EXECUTES A 
SET TO -1) TO GET THE ITEMS AND 
IN THE XXDP+ MONIT 


0 
ENTRY TO THE ITEM IN QUESTION. ) 
gg LEAVE ENTRY AS -1. WHEN THE RUNTIME 
GPHARD, IT USES THESE OFFSETS CIF NOT 
COMPARE WITH THOSE SAVED 
IF THE UNIT BEING REQUESTED MATCHES THE 
SS ae" THE RUNTIME SERVICES RETURN AN INCOMPLETE FLAG ON 


-PSECT 


LSUNIT:: .WORD 
LS$TIML::.WORD 
LSHPCP: : .WORD 

WORD 


- 
od 
9 
~ 
* se a ee 


THIS TABLE IS USED BY THE RUNTIME SERVICES TO PROTECT THE LOAD MEDIA. 


1ST ARG = OFFSET INTO P-TABLE FOR CSR ADDRESS 
2ND ARG = OFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
SRD ARG = OFFSET INTO P-TABLE FOR DRIVE NUMBER 


NGNA1 CNQNAAO DEQNA FUNCTIONAL TEST 
ow 


9-Jul-1984 07:06:36 SPIDERSUSERS: (BERG. DEQNA JNQNA1 .BLI;2 ‘hee? 





DS 


NQNA1 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 _ 29 
v01.0 PROTECTION TABLE 9-Jul-1984 07:06:36 SPIDERSUSERS: [BERG .DEQNA)NON“1.6L1;2 (25) 
000036 LSAPT:: .WORD 0 
000040 000124’ LSDOTP:: .WORD LSDISPATCH 
000042 000000 LS$PRIO::.WORD O 
000044 000000 LSENVI::.WORD 0O 
000046 000000 LSEXPi::.WORD 0O 
000050 LSMREV:: 
000050 003 BYTE 3 
000051 003 BYTE 3 
000052 000000 LSEF:: .WORD 0O 
000054 000000 .WORD O 
000056 000000 L$SPC:: .WORD 0 
000060 000000G L$DEVP::.WORD CLS&sOvTYP 
000062 000000G LSREPP::.WORD L$RPT 
000064 000000 LSEXP4::.WORD 0 
000066 000000 LSExPS::.WORD 0 
000070 000000G L$AUT:: .WORD LSAU 
000072 000000G L$DUT:: .WORD LS$DU 
000074 000000 LSLUN:: .WORD 
000076 000000G LSDESP::.WORD LSDESC 
000100 104035 L$LOAD::.WORD -73743 
000102 000174’ LSETP:: .WORD LSERRTBL 
000104 000000G LSICP:: .WORD LSINIT 
000106 000000G LSCCP:: .WORD LSCLEAN 
000110 000000G LS$ACP:: .WORD LSAUTO 
006112 000232’ LSPRT:: .WORD ULSPROT 
000114 000000 LSTEST::.WORD 0O 
000116 000000 LSDLY:: .WORD 0 
000 000000 LSHIME::.WORD 0 
000122 000024 DSPCNT::.WORD 24 
000124 000000G LSDISPATCH:: 
-WORD Ti 

000126 000000G -WORD fT2 
000130 000000G -WORD 13 
000132 000000G WORD T4 
000134 000000G -WORD T5 
000136 000000G -WORD T6 
000140 000000G WORD 17 
000142 000000G -WORD 18 
000144 000000G -WORD T9 
000146 000000G -WORD T10 

150 000000G WORD Til 
000152 000000G -WORD Tl2 
000154 000000G -WORD 113 
000156 000000G WORD 114 
000160 0000006 WORD T15 
000162 000000G -WORD 116 
000164 000000G WORD 117 
000166 000000G -WORD 118 
000170 0000006 -WORD 119 
000172 000000G -WORD 120 
000174 ERRTYP:: .BLKW 1 
000176 ERRNBR:: .BikKw 1 
000200 ERRMSG::.8LKW 1 


[ AT 


000000C 


174440 
000300 


177777 
177777 
177777 


CNQNAAO DEQNA FUNCTIONAL TEST 
PROTECTION TABLE 


ERRBLK:: .BLKW 
L SHWLEN: : 


. WORD 
DFSTBL:: .WORD 
WORD 


L SNDHW: : .BLKW 
LSSWLEN:: 


SuP. TIMER: : 


SWP. BLOCK .MEM: : 


LSNDSW:: .BLKW 
LS$PROT: : .WORD 
WORD 


P. AAA: 


P.AAB: 


-ASCII 
-ASCII 





1 


ea 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


a 


-334 
300 
1 


<<LSNDSW-L SSWLEN>/2> 


4 
a 


SPLITS, RO, OD 
/DEQ/ 


/NA / 
41/<57>/0/ 
4 PAs 


/GE / 
/ADR/ 


/ / 
4 4¢<00><00> 


“INT/ 


SEG 0030 


VAX-11 Bliss-16 V4.0-579 


P 
SPIDERSUSERS ;: [BERG.DEQNA JNQNA1.BLI;2 


age 50 
(25) 


CNQNAAO 
PROTECTION TABLE 


DEQNA FUNCTIONAL TEST 


P.AAD: 


P.AAE: 


P.AAF: 


P.AAG: 


P.AAH: 


ra 


12-Jul-1984 13:03:05 
99-Jul-1984 07:06:36 


SEQ 0031 


VAX-11 Bliss-16 V4.0-579 


Pp 
SPIDERS USERS : (BERG. DEQNA JNQNA1 .BLI;2 


age 31 
(25) 


ReSSSSESEES 


SSSESESE5 
BESSSESSESESSEE 


se 
- 
w 





SRRRSEERESREEE 


fr 
\o] 
reat 


CNQNAAO DEQNA FUNCTIONAL TEST 
PROTECTION TABLE 


P.AAI: 


P.AAJ: 


P.AAK: 


-ASCII 


"ASCII 


/TED/ 


G3 


12-Jul-1984 13:03:05 
9-Jui-1964 07:06:36 


SEQ ——— 


VAX-11 Bliss-16 V4.0-579 
SPIDERS USERS : (BERG. DEQNA JNQNA1 .BLI;2 


Page 32 
(25) 





853383 


m~ 


me pee 
or 


SS5SREEE3 


ese 


3 


HS 


SE 
CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-12 Bliss-16 V4.0-579 . a 33 
PROTECTION TABLE 99-Jul-1984 07:06:36 SPIDERSUSERS : (BERG. DEQNA JNQNA1.BLI;2 (25) 
123 103 ASCII /€SC/ 
111 120 ASCII /RIP/ 
117 122 ASCII /TOR/ 
ASCII / / 
122 103 ASCII / RC/ 
ASCII /V D/ 
123 103 ASCII /€SC/ 
111 ASCII /RIP/ 
117 122 ASCII /TOR/ 
045 116 ASCII / @N/ 
000 .ASCII <00><00> 
101 040 P.AAL: .ASCII /s#A / 
040 ASCII / / 
106 ASCII / F/ 
101 107 ASCII /LAG/ 
127 117 ASCII / WO/ 
104 040 ASCII /RD / 
040 040 ASCII / / 
040 040 . .. ae, 
040 040 ASCII / / 
040 040 ASCII / / 
040 040 ASCII / / 
040 045 ASCII / #/ 
066 045 ASCII /068/ 
040 040 .ASCII /A / 
040 040 ASCII / / 
040 040 ASCII ¢/ / 
040 040 ASCII / / 
045 117 ASCII / 80/7 
045 116 ASCII /68N/ 
-ASCII <00> 
101 040 P.AAM: .ASCII /#A / 
040 040 ASCII / / 
040 110 -ASCII / W/ 
107 110 -ASCII /IGH/ 
117 122 -ASCII / OR/ 
105 122 -ASCII /DER/ 
101 104 ASCII / AD/ 
122 040 -ASCII /OR 
111 124 .ASCII /BIT/ 
040 ASCII /S / 
040 040 ASCII / / 
040 045 ASCII / #/ 
066 045 ASCII /06s/ 
040 040 ,ASCII /A / 
040 040 ASCII / / 
040 040 ASCII / / 
040 040 ASCII / / 
045 117 ASCII / #0/ 
045 116 ASCII /68N/ 
‘ I <00> 


ASCII 
101 040 P.AAN: .ASCII /#A / 
040 sc 


- I 


114 


CNQNAAO DEGNA FUNCTIONAL TEST 
PROTECTION TABLE 


P.AAO 


P AAP 


taints ° wad 
2 e. 
~~~ SS SSS SS SS 


13 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


SEQ 0034 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG .DEQNA )NQNA1.BLI;2 


age 34 
(25) 


os TT LTT 


CNQNAAO 
PROTECTION TABLE 


DEQNA FUNCTIONAL TEST 


P.AAQ: 


P.AAS: 


“ASCII 


i.) 
& 
i i i i, i | 


a a> — — 
ae *8. 3 ¥ 
~ SAAS SNS 


ive 
.~A SAS SS 


4 &/ 


JS 


12-Jul-1984 15:03:05 
9-Jul-1984 07:06:36 


SEQ 0035 


VAX-11 Bliss-16 V4,0-579 


Pp 
SPIDERSUSERS : (BERG .DEQGNA JNQNA1.BLI;2 


age 55 
(25) 





CNQNAAO DEQNA FUNCTIONAL TEST 
PROTECTION TABLE 


E333 


SSSESSSELHREERES SRSLEKSLERE 


KS 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


P. AAT: 


P.AeU: 


P. AAV: 





SEQ 0036 
VAX-11 Bliss-16 V4.0-579 Page 36 
SPIDERSUSERS :(BERG.DEQNAJNQNAL.BLI;2 (25) 


CNQ@NAAO DEQNA FUNCTIONAL TEST 
PROTECTION TABLE 


P. AAW: 





LS 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


SEQ 0037 


VAX-11 Bliss-16 V4.0-579 


P 
SPIDERSUSERS : (BERG .DEQNA JNQNA1 .BLI;2 


ege 357 
(25) 





MS 


NQNAL CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Blies-16 V4.0-579 -_ 38 
v01.0 PROTECTION TABLE 9-Jul-1984 07:06:36 SPIDERSUSERS : [BERG . DEQNA JNQNA1 .BLI;2 O8F 25) 
002213 075 040 ASCII /#/ 
002216 045 117 066 ASCII /#06/ 
002221 045 116 000 .ASCII /#N/<00> 
002224 045 101 040 P.AAZ: .ASCII /#A / 
002227 102 101 104 ASCII /BAD/ 
002232 040 103 123 ASCII / CS/ 
002235 122 040 075 -ASCII /R =/ 
045 117 -ASCII / #0/ 
002243 066 045 116 ASCII /6sN/ 
002246 000 000 .ASCII <00><00> 
045 101 040 P.ABA: .ASCII /#A / 
002253 114 117 117 ASCII /LOO/ 
002256 120 102 101 ASCII /PBA/ 
002261 103 113 ASCII /CK / 
101 103 -ASCII /PAC/ 
002267 113 105 124 -ASCII /KET/ 
002272 125 116 -ASCII / UN/ 
002275 101 102 114 -ASCII /ABL/ 
002300 105 040 124 , II /€ T/ 
002303 117 040 123 II /0 S/ 
105 124 040 SCII /ET / 
002311 103 101 040 é II /CA / 
002314 102 111 124 P II /B8IT/ 
002317 040 103 a5 60, GS 
123 122 040 -ASCII /SR / 
002325 075 040 045 -ASCII /= #/ 
117 066 045 é II /068/ 
002333 116 000 000 -ASCII /N/<00><00> 
002336 045 101 040 P.ABB: .ASCII /#A / 
002341 114 117 117 -ASCII /L00/ 
120 102 101 -ASCII /PBA/ 
002347 103 113 -ASCII /CK / 
002352 101 103 -ASCII /PAC/ 
355 113 105 124 -ASCII /KET/ 
002360 125 116 -ASCII / UN/ 
002363 101 102 114 -ASCII /ABL/ 
105 040 II /€ T/ 
002371 117 040 103 -ASCII /0 C/ 
002374 114 105 101 -ASCII 
002377 040 103 ; II /R C/ 
101 040 102 -ASCII /A B/ 
002405 111 124 054 -ASCII /IT,/ 
002410 040 103 123 -ASCII / CS/ 
002413 122 075 -ASCII /R =/ 
002416 040 045 117 -ASCII / #0/ 
002421 066 045 116 -ASCII / 
002424 000 000 -ASCII <00><00> 
002426 045 101 040 P.ABC: .ASCII /#A / 
002431 103 101 040 -ASCII /CA / 
002434 102 111 124 -ASCII /BIT/ 
002437 040 117 113 -ASCII / OK/ 
002442 054 102 -ASCII /, B/ 
002445 125 124 040 -ASCII /UT / 





NS 


NQNA1 CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 wm 39 
vo1.0 PROTECTION TABLE 9-Jul-1984 07:06:36 SPIDERSUSERS : (BERG . VEQNA JNQNA1 .BLI;2 (25) 
002450 122 111 ASCII /RI / 
002455 102 111 124 II /B6IT/ 
002456 040 111 123 ASCII / IS/ 
002461 040 116 117 -ASCII / NO/ 
124 117 -ASCII /T O/ 
002467 116 040 -ASCII /N, / 
002472 103 123 122 ASCII /CSR/ 
002475 040 075 040 ASCII /=#/ 
045 117 066 II /#06/ 
002505 045 116 000 -ASCII /#N/<00> 
045 101 040 P.ABD: .ASCII /#A / 
002511 103 101 040 -ASCII /CA / 
002514 102 111 124 -ASCII /BIT/ 
002517 040 111 116 -ASCII / IN/ 
040 124 110 -ASCII / TH/ 
002525 105 040 103 -ASCII /E C/ 
002530 125 122 040 -ASCII /SR / 
127 101 123 -ASCII /WAS/ 
002536 123 105 -ASCII / SE/ 
002541 124 040 124 -ASCII /T T/ 
002544 117 117 040 -ASCII /00 / 
002547 105 101 122 -ASCII /EAR/ 
114 131 054 -ASCII /LY,/ 
002555 103 123 -ASCII / CS/ 
002560 122 040 075 -ASCII /R =/ 
002563 040 045 117 -ASCII / #0/ 
066 045 116 -ASCII /6sN/ 
002571 000 -ASCII <00> 
002572 045 101 040 P.ABE: .ASCII /#A / 
002575 130 114 040 -ASCII /XL / 
002600 101 116 104 -ASCIT /AND/ 
002603 040 122 114 -ASCII / RL/ 
040 050 040 -ASCII /(C / 
002611 102 111 124 -ASCII /B6IT/ 
002614 123 040 064 -ASCII /S 4/ 
002617 065 040 II /,5/ 
051 040 124 -ASCII /) T/ 
117 040 102 -ASCII /0 B/ 
002630 105 040 122 -ASCII /E R/ 
002633 105 123 105 II /€SE/ 
002636 040 124 ASCII /T T/ 
002641 117 040 060 -ASCII /0 O/ 
045 116 000 -ASCII /#N/<00> 
002647 000 -ASCII <O0> 
002650 045 101 040 P.ABF: .ASCII /#A / 
002653 130 114 040 ~ASCII /XtL / 
002656 101 116 104 -ASCII /AND/ 
002661 040 122 114 -ASCII / RL/ 
040 040 -ASCII /(C€ / 
002667 102 111 124 -ASCII /6IT/ 
002672 123 040 064 ASCII /S 4/ 
002675 065 040 -ASCII /,5 / 
002700 051 040 124 II /) T/ 





B4 


NQNA 1 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Blies-16 V4.0-579 gy * any 40 
vo1.0 PROTECTION TABLE 9-Jul-1984 07:06:36 SPIDERSUSERS : [BERG . DEQNA JNQNA1 .BLI;2 (25) 
002703 117 040 102 -ASCII /0 B/ 
002706 105 040 125 -ASCII /€ S/ 
002711 105 124 -ASCII /€1 / 
002714 124 117 040 -ASCII /T0 / 
002717 061 045 116 -ASCII /1¢8N/ 
002722 000 000 -ASCII <00><00> 
002724 045 101 040 P.ABG: .ASCII /#A / 
002727 122 111 040 -ASCII /RI / 
002732 050 040 102 -ASCII /C€ B/ 
002735 111 124 040 ASCII /IT / 
002740 061 065 040 eASCII 715 / 
002743 051 040 124 -ASCII /) T/ 
002746 117 040 102 -ASCII /0 B/ 
002751 105 040 123 ASCII /€ S/ 
002754 105 124 040 -ASCII /ET / 
002757 124 117 040 ASCII /T0 / 
002762 061 045 116 -ASCII /18N/ 
002765 000 -ASCII <O0O> 
002766 045 101 040 P.ABH: .ASCII /s#A / 
002771 130 111 040 -ASCII /XI / 
002774 050 040 102 ASCII /C€ B/ 
002777 111 124 040 ASCII /IT / 
003002 067 040 051 -ASCII /7 )/ 
003005 040 124 117 -ASCII / TO/ 
003010 040 102 105 -ASCII / BE/ 
003013 040 123 105 -ASCII / SE/ 
003016 124 040 124 eASCII /T T/ 
3021 117 040 061 eASCII /0 17 
3024 045 116 000 -ASCII /8N/<00> 
003027 000 -ASCII <00> 
003030 045 101 040 P.ABI: .ASCII /#A / 
003033 116 111 040 eASCII /NI / 
0035036 050 040 102 ASCII /(€ B/ 
0035041 111 124 O40 -ASCII /1IT / 
3044 062 040 951 -ASCII /2 )/ 
003047 040 124 117 -ASCII / TO/ 
3052 040 102 105 ASCII / BE/ 
003055 040 123 105 -ASCII / SE/ 
3060 124 040 124 ASCII /T T/ 
003063 117 040 061 -ASCII /0 1/7 
3066 045 116 000 -ASCII /#8N/<00> 
003071 000 eASCII <00> 
003072 045 101 040 P.ABJ: .ASCIZ /#A / 
0035075 116 111 040 -ASCII /NI / 
003100 050 040 102 ASCII /(€ B/ 
003103 111 124 040 -ASCII /IT / 
0031 062 040 051 ASCII /2 )/ 
003111 040 124 117 -ASCII / TO/ 
003114 040 102 105 -ASCII / BE/ 
003117 040 122 105 -ASCII / RE/ 
003122 123 105 124 ASCII /SET/ 
003125 040 124 117 ASCII / TO/ 
003130 040 060 045 -ASCII / Os/ 





C4 


NQNA1 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 = tae 41 
v01.0 PROTECTION TABLE 9-Jul-1984 07:06:36 SPIDERSUSERS : [BERG . DEQNA JNQNA1 .BLI;2 (25) 
003133 116 000 000 .ASCII /N/<00><00> 
003136 045 101 040 P.ABK: .ASCII /#A / 
003141 102 101 104 -ASCII /BAD/ 
003144 040 103 123 ASCII / CS/ 
003147 122 054 040 ASCII /R, / 
003152 105 130 120 -ASCII /EXP/ 
003155 105 103 124 -ASCII /ECT/ 
003160 105 104 000 -ASCII /€D/<00> 
003163 000 -ASCII <0O0O> 
003164 045 101 040 P.ABL: .ASCII /#A / 
003167 103 123 122 -ASCII /CSR/ 
003172 040 101 104 -ASCII / AD/ 
003175 122 040 075 ASCII /R =/ 
3200 040 045 i117 ASCII / #0/ 
003205 066 045 101 -ASCII /68A/ 
3206 040 040 101 ASCII / A/ 
003211 103 124 125 -ASCII /CTU/ 
003214 101 114 040 -ASCII /AL / 
003217 075 040 045 -ASCII /= #/ 
117 066 045 -ASCII /068/ 
003225 101 040 040 ASCII /A / 
003230 105 130 120 -ASCII /EXP/ 
003233 105 103 124 -ASCII /ECT/ 
003236 105 104 040 -ASCII /ED / 
003241 075 040 045 ASCII /= #/ 
003244 117 066 045 -ASCII /068/ 
003247 116 000 000 eASCII /N/<00><00> 
003252 045 116 045 P.ABM: .ASCII /sNs/ 
003255 101 040 125 ASCII /A U/ 
3260 116 101 102 -ASCII /NAB/ 
003263 114 105 040 ASCII AE / 
003266 124 117 040 ASCII /T0 / 
003271 lz2 105 123 -ASCII /RES/ 
003274 105 124 040 -ASCII /€T / 
003277 104 105 121 -ASCII /DEG/ 
003302 116 101 072 -ASCII /WA:/ 
003305 040 101 104 -ASCII / AD/ 
003310 122 072 040 ASCII /R: / 
003313 045 117 066 ASCII /806/ 
003316 045 101 040 ASCII /@A / 
003321 040 103 123 ASCII 7 CS/ 
003324 122 040 075 -ASCII /R =/ 
003327 040 045 117 ASCII / #0/ 
003332 066 045 116 -ASCII /6aN/ 
003335 000 -ASCII <00> 
003336 045 116 045 P.ABN: .ASCII /sNe/ 
003341 101 040 127 -ASCII /A W/ 
003344 101 111 ieé -ASCII /AIT/ 
003347 040 101 102 -ASCII / AB/ 
003352 117 125 124 -ASCII /OUT/ 
003355 040 045 104 -ASCII / #0/ 
003360 062 045 101 -ASCII /2e8A/ 
003363 040 123 105 ASCII / SE/ 


panee D4 | 


SEG A any 


NQNAL CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 Page 42 
v01.0 PROTECTION TABLE 9-Jul-1984 07:06:36 SPIDERSUSERS : [BERG.DEQNA JNQNA1 .BLI;2 (25) 
003366 103 117 116 -ASCII /CON/ 
003371 104 050 123 ASCII /D(S/ 
003374 051 040 055 -ASCII /) -/ 
003377 000 -ASCII <0O0> 
003400 045 116 045 P.ABO: .ASCII /sNs/ 
003403 101 040 123 -ASCII /A S/ 
003406 101 116 111 -ASCII /ANI/ 
003411 124 131 040 Ir stv / 
003414 124 111 115 ASCII /TIM/ 
003417 105 122 040 ASCII /ER / 
003422 124 111 115 -ASCII /TIM/ 
003425 105 104 040 I /€0 / 
003430 117 125 124 -ASCII /0QUT/ 
003433 101 123 -ASCII / AS/ 
003436 040 105 130 -ASCII / EX/ 
003441 120 105 103 -ASCII /PEC/ 
124 105 104 -ASCII /TED/ 
003447 040 045 116 -ASCII / @N/ 
003452 000 000 -ASCII <00><00> 
003454 045 116 045 P.ABP: .ASCII /sNs/ 
003457 101 040 116 -ASCII /A N/ 
003462 117 040 123 ‘ Ir /0 S/ 
003465 101 116 111 -ASCII /ANI/ 
003470 124 131 04 ‘ 6 60N 
003473 124 111 115 4 I /TIM/ 
003476 105 122 040 . I /ER / 
003501 111 116 -ASCII /INT/ 
003504 105 122 122 -ASCII / 
003507 125 120 124 ; I /UPT/ 
003512 040 104 105 4 I / DE/ 
003515 124 105 103 -ASCII /TEC/ 
003 124 105 104 7 I /TED/ 
003523 040 045 116 ‘ I / @N/ 
003526 000 000 -ASCII <00><00> 
003530 045 116 045 P.ABG: .ASCII /sNs/ 
003533 101 040 104 -ASCII /A O07 
003536 111 123 103 2 I /ISC/ 
003541 117 116 116 ‘ II /ONN/ 
003544 105 103 124 -ASCII /ECT/ 
003547 040 124 122 = I / TR/ 
003552 101 116 123 -ASCII /ANS/ 
003555 103 105 111 -ASCII /CEI/ 
003560 126 105 122 -ASCII /VER/ 
003563 040 103 101 ASCII / CA/ 
3 102 114 105 ASCII /B8LE/ 
003571 106 122 -ASCII / FR/ 
003574 117 115 040 -ASCII /0M / 
003577 102 125 114 ASCII /BUL/ 
113 110 105 -ASCII /KHE/ 
003605 101 104 040 -ASCII /AD / 
003610 101 123 123 ASCII /ASS/ 
003613 105 115 102 ASCII /EMB/ 


E4 


CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 = Bg 43 
PROTECTION TABLE 9-Jul-1984 07:06:36 SPIDERSUSERS : (BERG. DEQNA JNQNA1.BLI;2 (25) 
116 104 -ASCII /AND/ 
000 -ASCII <00><00> 
116 045 P.ABR: .ASCII /sNs/ 
040 103 eASCII /A C/ 
116 116 -ASCII /ONN/ 
103 124 eASCII /ECT/ 
114 117 -ASCII / LO/ 
120 102 -ASCII /0OPB/ 
103 113 -ASCII /ACK/ 
103 117 -ASCII / CO/ 
116 105 -ASCII / 
124 117 -ASCII /CTO/ 
040 124 -ASCII /R T/ 
040 102 -ASCII /0 B/ 
114 113 -ASCII /ULK/ 
105 101 -ASCII /HEA/ 
040 101 -ASCII /D A/ 
123 105 -ASCII /SSE/ 
102 114 -ASCII /*BL/ 
040 ASCII /Y, # 
110 105 -ASCII /THE/ 
040 122 -ASCII /N R/ 
124 105 -ASCII /ETE/ 
124 045 -ASCII /ST#/ 
000 -ASCII /N/<00> 
116 045 P.ABS: .ASCII /sNs/ 
040 104 eASCII /A D/ 
123 103 -ASCII /ISC/ 
116 116 -ASCII / 
103 124 -ASCII /€CT/ 
102 125 -ASCII / BU/ 
113 110 eASCII /LKH/ 
101 104 ASCII /EAD/ 
101 123 -ASCII / AS/ 
105 115 -ASCII /SEM/ 
114 131 -ASCII /B8LY/ 
106 122 -ASCII / FR/ 
115 040 -ASCII /0M / 
105 121 -ASCII /DEG/ 
101 0 -ASCII /NA / 
116 104 -ASCII /AND/ 
103 117 eASCII / CO/ 
116 105 .ASCII / 
124 eASCII /€T/<00> 
-ASCII <00> 
116 045 P.ABT: .ASCII /sNs/ 
040 114 eASCII /AL/ 
117 120 -ASCII /00P/ 
101 103 -ASCII /BAC/ 
040 103 -ASCII /K C/ 
116 116 -ASCII /ONN/ 
103 124 -ASCII /ECT/ 


CNQNAAO 
PROTECTION TABLE 


DEQNA FUNCTIONAL TEST 


P ABU: 


P. ABV: 


P ABW: 


Fq 


12-Jul-1984 
9-Jul - 1984 


1 
0 


3; 
7: 


:03;05 
:06: 36 


SEQ oo 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : (BERG. DEGNA )JNQNA1 .BLI;2 


Page 44 
(25) 


G4 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05  VAX-11 Bliss-16 V4.0-579 - Samy 45 
PROTECTION TABLE 9-Jul-1984 07:06:36 SPIDER SUSERS : (BERG .DEQNA JNQNA1 .BLI;2 (25) 

040 122 105 ASCII / RE/ 
124 105 123 -ASCII /TES/ 
124 045 116 -ASCII /TSN/ 
000 -ASCII <00> 
045 116 045 P.ABX: .ASCII /sNs/ 
101 040 122 ASCII /A R/ 
105 120 114 P I /EPL/ 
101 103 105 ‘ I /ACE/ 
040 102 125 -ASCII / BU/ 
114 113 110 ASCII /LKH/ 
105 101 104 -ASCII /EAD/ 
040 103 117 -ASCII / CO/ 
116 116 105 -ASCII /NNE/ 
103 117 eASCII /CTO/ 
122 054 040 -ASCII » 7 
124 110 105 -ASCII /THE/ 
116 040 122 ASCII /N R/ 
105 124 105 -ASCII /ETE/ 
123 124 045 -ASCII /S18#/ 
116 000 000 -ASCII /%/<00><00> 
045 116 045 P.ABY: .ASCII /sNs/ 
101 040 104 -ASCII /A D/ 
111 123 103 -ASCTZ /ISC/ 
117 116 116 .ASCII 
105 103 124 -ASCII /ECT/ 
040 124 -ASCII / TR/ 
101 116 123 -ASCII /ANS/ 
103 105 111 -ASCII /CEI/ 
126 105 -ASCII /VER/ 
040 103 101 -ASCII / CA/ 
102 114 105 -ASCII /@LE/ 

106 122 eASCII / FR/ 
117 115 040 -ASCII /0M / 

122 101 -ASCII /TRA/ 
116 123 103 -ASCII /NSC/ 
105 111 126 -ASCII /€IV/ 
105 122 000 -ASCII /ER/<00> 
000 -ASCII <00> 
045 116 045 P.ABZ: .ASCII /sNe/ 
101 040 101 ASCII /A A/ 
116 104 -ASCII /ND / 
103 117 116 -ASCII /CON/ 
116 105 103 -ASCII /NEC/ 

040 111 ASCII /T I/ 
124 040 124 eASCII /T T/ 
117 114 ASCII /OL/ 
117 117 120 -ASCII /00P/ 
102 101 103 «ASCII /BAC/ 
113 040 103 ASCII /K C/ 
117 116 116 ASCII « 
105 103 124 -ASCIT /€CT/ 
117 122 040 -ASCI /OR / 





CNQNAAO 
PROTECTION TABLE 


DEQNA FUNCTIONAL TEST 


P.ACA: 


P.ACB: 


P.ACC: 


PACD: 


.ASCIT 
.ASCIT 


H4 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


SEQ Fey 


VAX-13 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA )JNQNA1. BLT: 


46 
oF 25) 


CNQNAAO 
PROTECTION TABLE 


DEQNA FUNCTIONAL TEST 


P.ACE: 


P ACF: 


P.ACG: 


P.ACH: 


14 


12-Jul-1984 15:03:05 
99-Jul-1984 07:06:36 


SEQ Kaew 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNA1 .BLI;2 


Page 47 
(25) 


CNQNAAO 

PROTECTION TABLE 
124 
040 


DEQNA FUNCTIONAL TEST 


P.ACI: 


P.ACJ: 


PACK: 


P.ACM: 


VAX-11 Bliss-16 V4.0-579 


12-Jul-1984 13:03:05 Pose 
SPIDERSUSERS : (BERG. DEQNA JNQNA1.BLI;2 


9-Jul-1984 07:06:56 


CNQNAAO 
PROTECTION TABLE 


DEQNA FUNCTIONAL TEST 


P.ACN: 


P.ACO: 


P.ACP: 


K4 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


—, 0049 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEGNA )NQNA1 .BLI;2 


Pege 49 
(25) 


CNQNAAO DEQNA FUNCTIONAL TEST 


PROTECTION TABLE 


P.ACQ: 


P.ACR: 


P.ACS: 


-ASCIT 


L4 


12-Jul-1984 13:03:05 
99-Jul-1984 07:06; 36 


SEQ 0050 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNA1 .BLI;2 


ege 50 
(25) 


M4 


CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05  VAX-11 Bliss-16 V4.0-579 “ 
PROTECTION TABLE 9-Jul-1984 07:06:36  SPIDERSUSERS:(BERG.DEQNAJNONAL.BLI;2 (25) 

103 124 S040 ASCII /CT / 

075 040 «= 045 ‘ASCII /= %/ 

117 066—s(45S “ASCII /068/ 

101 040 105 [ASCII /A E/ 

130 120 040 ASCII /XxP / 

075 040 045 [ASCII /= #/ 

1170660845 [ASCII /06%/ 

116 000 000 [ASCII /N/<00><00> 
116 045 P.ACT: ‘ASCII /siNK/ 

101 040 102 “ASCII /A B/ 

101 104 040 “ASCII /AD / 

123 124 101 “ASCII /STA/ 

124 0©= lds? “ASCII /TIO/ 

116 101 [ASCII /N A/ 

106 8=104—Ss«122 “ASCII / 

105 123 ~=— 123 “ASCII /ESS/ 

072 040 000 -ASCII /: /<00> 

“ASCII <00> 

045 116 045 P.ACU: ASCII /sNs/ 

101 102 “ASCII /A B/ 

101 104 “ASCII /AD / 

104 8=«:105—Ssi.22 “ASCII /DEQ/ 

116 101 “ASCII 

111 0S7)—sda4A7 [ASCII /1/<57>/0/ 
120 101 “ASCII 

107 105 [ASCII /GE / 

122 105 107 “ASCII 

111-123 “ASCII /IST/ 

105 © 122—Sts«O72 “ASCII /ER:/ 

045 116 000 [ASCII /#N/<00> 

045 116 «= 045 P.ACV: ‘ASCII /sNs/ 

101 040 102 [ASCII /A B/ 

101 104 [ASCII /AD / 

103 123——St—«é122 “ASCII /CSR/ 
040 105 “ASCII /, E/ 

130 120 105 “ASCII /XPE/ 

103 124105 “ASCII /CTE/ 

106 040 = 122 “ASCII /D R/ 

114 040 050 “ASCII /L (/ 
102A II / BI/ 

124 040 065 “ASCII /T S/ 

040 051 = 040 "ASCII / ) / 

124 117 040 “ASCII /TO / 

102 105 040 “ASCII /BE_/ 

123 105 124 “ASCII /SET/ 

040 117 “ASCII / TO/ 

040 060 045 “ASCII / O#/ 

116 000 000 -ASCII /N/<00><00> 

O45 116 045 P.ACW: ‘ASCII /#Ns/ 

101 040 102 ‘ASCII /A B/ 

101 104 040 “ASCII AD / 

102 057 104 "ASCII /B/<57>/D/ 

040 120 ~~» 122 ASCII / PR/ 





N4 
NQNA NGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05  VAX-11 Blies-16 v4.0-579 a i 
C “wUi- 205: ° 1Ss- .0- 
vo1.0 PROTECTION TABLE 9-Jul-1984 07:06:36 § SPIDERSUSERS:(BERG.DEQNAJNQNAL.BLI;2 (25) 


P.ACX: .ASCII /sNs/ 


P.ACY: .ASCII /sNs/ 





000400 
004400 


CNQNAAO DEGNA 
PROTECTION TABLE 
101 040 
130 120 
114 105 
040 075 
045 117 
045 116 
116 045 
040 122 
107 i11 
124 105 
040 106 
111 114 
104 040 
117 040 
105 123 
117 116 
040 101 
040 101 
104 122 
123 123 
040 040 
117 066 
116 000 
116 045 
040 102 
104 040 
122 101 
123 115 
124 040 
124 101 
125 123 
040 124 
117 040 
101 116 
040 103 
114 114 
125 111 
116 123 
116 000 


FUNCTIONAL TEST 


P.ACZ: 


P.ADA: 


-PSECT 
RCV.D.LIST:: 

-BLKW 
XMIT.D.LIST:: 

-OLKW 
RCV.BUFFER:: 


-BLKW 


XMIT .BUFFER: : 


-BLKW 


BS 


12-Jul-1984 13:05:05 


9-Jul-1984 07:06:36 SPIDERSUSERS : [BERG . DEQNA )NQNA1. BLIi2. 


/8N/<00> 


$GLOB$, 


100 


100 
2000 
2000 


0 


VAX-11 Bliss-16 V4.0-579 





SEQ ess 
53 
(25) 


NQNA1 
vO1.0 


010400 
010426 
011426 
011446 
011462 
011472 


DEGNA FUNCTIONAL TEST 


CNQNAAO 
PROTECTION TABLE 


PHYS.ADR:: 
.BLKW 
SETUP .BUFFER: : 
-BLKW 
IOP. TABLE: * 
ETH. STATION.ADR: 


10 
2 
4 
0 
3 


77 


SRRRRRRRRRRS SC EMS HR 


ow 


12-Jul-1984 13:03:05 
99-Jul-1984 07:06:56 


SEQ 0054 


VAX-11 Bliss-16 V4.0-579 


Pp 
SPIDERSUSERS : (BERG . DEQNA JNQNA1 .BLI;2 


ege 54 
(25) 


104 
125 


g 


idiot ttt tit ttt tte ttt tie tah tetas te tt tty 


SS 
a 
“Si 





CNQNAAO DEQNA FUNCTIONAL TEST 
PROTECTION TABLE 


See ORR ORO OOOO RNSS 


mm  * 


ow 
~ 
~ 


DS 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


—_ oy 
VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNA1. eur.” 


5 
(25 


5) 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
PROTECTION TABLE 


TO16:: 


S SERSSSSREEES5555 


ES 


12-Jul-1984 15:03:05 
9-Jul-1984 07:06:56 


NOVI awh re 
ur 


10 


- 100000 

- 100000 
XMIT .BUFFER 
-2000 

0 

- 100000 


- 100000 


SEQ 0056 


VAX-11 Bliss-16 V4.0-579 


P 
SPIDERSUSERS : (BERG . DEGNA JNQNA1 .BLI;2 


age 
(25) 


S6 


012102 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
PROTECTION TABLE 


TDO13:: 


PELLEEBETL ETE EE EEL EEEE EEE EERE EEE EE EEE 


ra 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 
-77600 
hence 
0 
0 
- 100000 
-77500 
— 
¢) 
0 
- 100000 
-77700 
jeans 
0 
0 
- 100000 
-60000 
—-* 
0 
0 
- 100000 
20000 
alam ane 
0 
0 
- 100000 
- 100000 
XMIT.D.LIST+70 


-1 
re 
0 

0 

- 100000 

- 100000 

XMIT .BUFFER+2 


VAX-11 Bliss-16 V4.0-579 


SEQ Bag 


57 
SPIDER SUSERS : (BERG . DEQNA JNQNA1 .BLI;2 rome a8) 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
PROTECTION TABLE 


RD13:: 


SESSSSSSSESSSSSESSSSSSEEE099 538555538855555528855595 


GS 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


-177 

'¢) 

0 

- 100000 

- 100000 
ee 
0 

0 

- 100000 

40000 

er enna ee 
0 

0 

- 100000 


-60000 
_ 


-1 
— 
Q 

0 

- 100000 


- 100000 
——— 
0 

0 

- 100000 


- 100000 
“ .BUFFER+204 


VAX-11 Bliss-16 V4.0-579 


SEQ ee 


58 
SPIDER SUSERS : (BERG . DEQNA JNQNA1 .BLI;2 Peet 8) 


012370 
012372 
012374 
012376 
012400 
012402 
012404 
012406 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
PROTECTION TABLE 


TEEPE EEE EEEEE EEE EEE EEE 


~~ -§ -F FP FF FY FF FF FF Sf 


HWP. TABLE: : 

SWP. TABLE: : 
-BLKW 

REG.ADR:: 

IOP DATA: : 
BLK 


H5 


12-Jul-1984 13:03:05 
9-Jul-1984 07:06:36 


- 100000 

- 100000 
—_— ER+374 
0 

0 

- 100000 

-40000 
— 
0 

0 

- 100000 


- 100000 


RCV .BUFFER-576 
} 


ee 


SEQ 0059 


VAX-11 Bliss-16 V4.0-579 


Page 
SPIDERSUSERS : (BERG .DEQNA JNONA1 .BLI;2 


59 
25) 


NQNA1 
vO1.0 


012410 
012412 
012414 
012416 
012420 
012422 
012424 
012426 
0124350 
012432 
012434 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
PROTECTION TABLE 


COUNTER: : . 
UP. COUNTER: : 
KW 


DOWN. COUNTER: : 
KW 


.BL 
CHECKSUM: : 
BUF LENGTH: | 
CSR.WORD: : 

.BLK 
XC .FLAG:: 
ERR.NUMBER: : 


a 


pobeceeeeseees 


PS:: -BLKW 


TBYTES: : .BLKB 
TBYTE4S: : .BLKB 
TADR1:: .BLKW 
TADR2:: .BLKW 





I5 


SEQ 0060 


12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 
9-Jul-1984 07:06:36 SPIDERSUSERS : (BERG. DEGNA )NQNA1 .BLI;2 


LSSOFT, TSPTHV, LSRPT, LSINIT 
LSCLEAN, L$LAST, L$HARD, L$OVTYP 
L$DESC, L$DU, L$AU, LSAUTO, Tl 
Te, T3, 14, TS, 16, T7, 18, T9 
T10, T11, T12, 713, 114, 115, 116 
717, 718, 719, T20 


age 60 
(25) 





a 


NQNA1 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15:03:05 VAX-11 Bliss-16 V4.0-579 =o 61 
v01.0 PROTECTION TABLE 9-Jul-1984 07:06:36  SPIDERSUSERS: (BERG RG.DEQNAJNQNAL.BLI;2 (25) 
100000 BIT15== - 100000 
040000 BIT14== 40000 
BIT13== 20000 
010000 BIT12=« 10000 
BIT1li== 4000 
002000 BIT10== 2000 
001000 BITO9== 1000 
BITOS== 400 
BITO72= 200 
000100 BIT06== 100 
BITOS== 40 
BITO4== 
000010 BITO3== 10 
000004 BITO2== 4 
000002 BITOL== 2 
000001 BITOO== 
001000 BIT9== 1000 
000490 BIT8== 400 
000200 BIT7== 200 
000100 BIT6== 100 
000040 BITS== 40 
000020 BIT4== 20 
000004 BIT2== a 
000002 BITi== Po 
000001 BITO-«= t 
EF .START== 40 
000037 EF .RESTART== 37 
000036 EF . CONTINUE == 36 
000035 EF .NEW== 35 
000034 EF .PWRe= 34 
000340 PRIO7== 340 
000300 PRIO6-2 300 
000240 PRIOS== 240 
000200 PRIO4== 200 
000140 PRIO3== 140 
000100 PRIO2== 100 
000040 PRIOL== 40 
000000 PRIOO== 0 
000004 EVL== 4 
000010 LOT== 10 
000020 ADR== 20 
000040 IDU== 40 
000100 ISR== 100 
000200 UAM== 200 
000400 BOE== 400 
001000 PNT«« 1000 
002000 PRI== 2000 
004000 IXE«= 4000 
010000 IBE== 10000 
020000 IER== 20000 


ee me ere eee 


KS 


NQNA1 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 = — 62 
v0O1.0 PROTECTION TABLE 99-Jul-1984 07:06:36 SPIDERSUSERS : (BERG .DEQNAJNQNA1 .BLI;2 (25) 

100000 HOE == - 100000 
000174’ LSERRTBL== ERRTYP 
000216’ L$SW-== L$SWLENe2 
000206 ' L$HW== LSHWLEN+2 
000011' L$DEPO== LSREV+i 
000000‘ DESCR.LIST== RCV.O.LIST 
000400' DATA. BUFFER== RCV .BUFFER 
000000’ QSTOl== ‘ 
000030' QSTO2== P.AAB 

: QSTO3== P. AAC 
000122" QSTO4<= P.AAD 
000164’ QSTOS== P. ARE 
000226 ' QST06== P.AAF 
000270' QSTO7== P.AAG 
000332' Fs P.AAH 
000370' MSGO1== P.AAI 
000452’ MSGO2== P.AAJ 
000540' MSGO3== P. AAK 
000644 ' MSGO04=2= P.AAL 
000736‘ MSGO5== P.AAM 
001030' MSGO06== P.AAN 
001122’ MSGO7== P. AAO 
001214’ MSGO8== P. AAP 
001306’ MSGO9== P. AAG 
001400’ MSG10== PAAR 
001462' MSG11== P.AAS 
001546' MSGl2== P.AAT 
001612’ MSG13== P. AAU 
001676‘ MSG14== P. AAV 
001766’ MSG15== P. AAW 

P MSG16== P.AAX 
002136’ MSG17== P.AAY 
002224’ MSG18== P.AAZ 
002250’ MSG19== P. ABA 
002336 ' MSG20== P. ABB 
002426’ MSG21== P.ABC 

‘ MSG22== P,. ABD 
002572’ MSG23== P ABE 
002650’ MSG24== P.ABF 
002724' MSG25== P.ABG 
002766‘ MSG26== P. ABH 
003030’ MSG27== P. ABI 
003072’ MSG28== P.ABJ 
003136’ MSG29== P.ABK 
003164’ MSG30== P.ABL 

‘ MSG31=- P. ABM 
003336’ MSG32== P.ABN 
003400’ MSG33-= P.ABO 

3454 ' MSG34== P. ABP 

003530’ MSG35-= P.ABQ 
003626‘ MSG36== P.ABR 
003732’ MSG37== P.ABS 
004024' MSG38=-= P. ABT 


-— SS — NT 


LS 


NQNA1 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:03:05 VAX-11 Bliss-16 V4.0-579 _ 6% 
v01.0 PROTECTION TABLE 99-Jul-1984 07:06:36 SPIDERSUSERS : (BERG. DEQNA JNQNA1 .BLI;2 (25) 
004104' MSG39=< P. ABU 
004170' MSG40== P.ABV 
004260' MSG41-= P. ABW 
004322 ' MSG42== P ,ABX 
004402’ MSG43=- P.ABY 
004466 ' MSG44== P.ABZ 
004570’ MSG45=<= P.ACA 
' MSG46== P.ACB 
004716’ MSG47=<= P ACC 
004772’ MSG46== P.ACD 
005030' MSG49=<= P.ACE 
005066 ' MSG50== P ACF 
005150° MSG51== P.ACG 
005202’ MSGS2== P.ACH 
005246‘ MSG53== P.ACI 
005276’ MSG54<= P.ACJ 
005346‘ MSG55== P. ACK 
005410' MSG56<= P.ACL 
° MSG57== P.ACM 
005536’ MSG58== P.ACN 
’ MSG59==2 P.ACO 
005714’ MSG60== P.ACP 
005756' MSG61== P.ACGQ 
006020' MSG62== P.ACR 
006110’ MSG63== P.ACS 
006204 ' MSG64== P.ACT 
006240’ MSG65== PACU 
006304' MSG66=-= P.ACV 
006372’ MSG67== P. ACW 
006474’ MSG66== P.ACX 
006572‘ MSG69=-= P ACY 
006672’ MSG70== P.ACZ 
006756‘ MSG71== P.ADA 
000206 ' HP .TABLE== LSHWLEN+2 
000216’ SP. TABLE == LSSWLENe2 
3 PSECT SUMMARY 
; 
3 Psect Name Words Attributes 
; sCODE$ 80 RO & I . LCL, REL. CON 
; $GLOB$s 2722 RW . D0 > LCL, REL, CON 
; SPLITS 1807 RO, D , LCL, REL, CON 


; 
; 
. 
+ 
; 


Library Statistics 


File Total 


Pages Processing 
Mapped Time 





MS 


NQNA1 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15:03:05 
vo1.0 PROTECTION TABLE 99-Jul-1984 07:06:36 
; SPIDERSUSERS: (BERG. DEQNA JQNALIB.L16;5 223 88 39 14 


COMMAND QUALIFIERS 
BLISS/PDP11/ENV:NOEIS NQNA1.BLI/LIST=NQNA1.LIS/OBJECT =NQNA1 .OBJ/SOURCE =PAGE : 55 


Size: 0 code + 4609 date words 
Run Time: 00:23.9 

Elapsed Time: 00:39.8 

Lines/CPU Min: 6070 
Lexemes/CPU-Min: 38463 

Memory Used: 236 pages 

Compilation Complete 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG .DEQNA JNQNA1 .BLI;2 


00:00.1 


SEQ 0064 
Page 
(25) 


64 


rPrrrrOOO0C0°0 


CNQNAAO DEQNA FUNCTIONAL TEST 


NS | 
SEG 0065 


12-Jul-1984 13:03:47 VAX-11 Bliss-16 V4.0-579 
99-Jul-1984 07:10:19 SPIDERSUSERS ; (BERG. DEGNA JNONA2.BLI;2 °™* (1) 


MODULE NQNA2 (ore bw we DEQNA FUNCTIONAL TEST’ 


IDENT = ‘VO1.0 
ADDRESSING _ MODE C ABSOLUTE ) 


) = 
SSBTTL ‘PROGRAM INIT MODULE’ 
BEGIN 


LIBRARY ‘QNALIB’; 
REQUIRE ‘BLSMAC.REQ’ ; 


! QNALIB LIBRARY 
! DIAGNOSTIC SUPERVISOR LIBRARY 


of 


~ 
So 


ob bP Fb bP Pe be be be be pe 


B6 


CNGNAAO DEGNA FUNCTIONAL TEST 12-Jul 
EXTERNAL DECLARATIONS 9-Jul 


SSBTTL ‘EXTERNAL DECLARATIONS’ 
¢ <OLF /F ORMAT > 


-1984 13:03:47 
-1984 07:10:19 








CODE + AASCODES; 
FORWARD ROUTINE 
NXM_INT : LSISR NOVALUE; 


EXTERNAL ROUTINE 
RESET _DEQNA : NOVALUE; 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG . DEQNA 


SEQ 0066 


Pp 
JNQNA2 .BLI;2 


age 


2 
(2) 


PP ee et he Oe Fe be ee he he be he he be be ee he he ho FF he Fe be be fe be ee be Fe Oe Be he be be be be be he ee 


C6 


CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:47  VAX-11 Bliss-16 v4.0-579 m— 
EXTERNAL DECLARATIONS 9-Jul-1984 07:10:19  SPIDERSUSERS: (BERG.DEQNA)NONA2.BLI;2 
EXTERNAL 
See 
COMMUNICATION AREA DECLARATIONS 
Sco 

IOP _TABLE : VECTOR [ 8, WORD }. 


HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS 


HWP_TABLE =: REF BLOCK ( HWP_SIZE, WORD ) FIELD ( HWP_FIELDS ), 
SWP_TABLE =: REF BLOCK { SWP_SIZE, WORD ] FIELD ( SWP_FIELDS ), 


INTERRUPT _FLG : WORD, ! 1 = INTERRUPT OCCURED 
REG_ADR : REF REG_STR FIELD ( IOP_FIELDS ), 
IOP _DATA : REF REG_STR FIELD ( IOP_FIELDS ), 
GET_ADR : REF ADR_STR FIELD ( IOP_FIELDS . 


TEMPORARY STORAGE DATA DECLARATIONS 


TMP _IOP_ADR : WORD, ' I/O PAGE REGISTER ADDRESS 
TMP_REG_DATA : WORD, § I/O PAGE REG CONTENTS 
TEMP 1 : WORD, § TEMPORARY STORAGE LOCATION 
TEMP2 : WORD. * TEMPORARY STORAGE LOCATION 
TEMPS : WORD, § TEMPORARY STORAGE LOCATION 
TEMP4 : WORD, § TEMPORARY STORAGE LOCATION 
TEMPS : WORD, § TEMPORARY STORAGE LOCATION 
TEMP6 : WORD, § TEMPORARY STORAGE LOCATION 
TEMP7 : WORD, § TEMPORARY STORAGE LOCATION 
TEMPS : WORD, ! TEMPORARY STORAGE LOCATION 
TEMPS : WORD, § TEMPORARY STORAGE LOCATION 

See 

: QUESTIONS AND ERROR MESSAGEES DECLARED EXTERNALLY 


QSTO1, QSTO2, QSTO3, QSTO4, QSTOS, QSTO6, GSTO7, MSG54; 


3 
(3) 


Oo ee he he he be he be be he pe pe pe 





CNGNAAO DEQNA FUNCTIONAL TEST 
TYPE AND DESCRIPTION 


SSBTTL ‘TYPE AND DESCRIPTION’ 


See 
: NAMES OF DEVICES SUPPORTED BY PROGRAM 


fae 
EQUALS 
DEVTYP (sASCIZ’ DEQNA/M7504' ); 


TEST DESCRIPTION 


DESCRIPT (sASCIZ‘DEQNA FUNCTIONAL TEST’ ); 


D6 


12-Jul-1984 15:02:47 


9-Jul-1984 07:10:19 


SEQ eee 
SPIDERSUSERS : [BERG . DEQNA JNQNA2 .BLI;2 ea 


VAX-11 Bliss-16 V4.0-579 


(4 


4 
) 


———_———— 


> be bt he fe be pe pe Be fe he fe be be be Pe ee ee be pe po 


E6 


12-Jul-1984 13:05:47 VAX-11 Bliss-16 V4.0-579 
99-Jul-1984 07:10:19 SPIDERSUSERS : (BERG . DEQNA JNQNA2 .BLI;2 


SEQ 0069 
Page 


NQNAAO DEQNA FUNCTIONAL TEST 
HARDWARE PARAMETER CODING SECTION 


SSBTTL ‘HARDWARE PARAMETER CODING SECTION’ 


oe 
o 


THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 

MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 


WITH THE OPERATOR. 


THIS CODE IS USED BY THE SUPERVISOR TO INTERROGATE THE OPERATOR 
FOR DEVICE INFORMATION TO PUT IN THE P-TABLE. THIS CODE IS USED 
IN CONJUNCTION WITH THE DEFAULT P-TABLE TEMPLATE. THE MACROS 
USED IN THIS SECTION ARE “GPRMD”, “GPRMA". 


e 


GPRMA Castor, #0'0', 0, 60'174440', #80'174460', YES, 1); ! 1/0 PAGE ADDRESS ? 
GPRMA (QSTO2, #0'2', 0, #0‘'300’, #0' 304’, YES, 1); ! INTERRUPT VECTOR ADDR ? 


5 
(5) 


< 
°o 
~ 
o 


oe G+ @F @F GF GF Ge Ge G+ GF Ge G+ Ge @F Ge Ge or oe GF oF 


oe ee ee be be ee pe be be be be Be Be ee Be pe 


F6 


12-Jul-1984 13:03:47 


DEQNA FUNCTIONAL TEST 
99-Jul-1984 07:10:19 


CNQNAAO 
SOFTWARE PARAMETER CODING SECTION 
SSBTTL ‘SOFTWARE PARAMETER CODING SECTION’ 


am 
- 


THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT -y USED BY THE SUPERVISOR TO BUILD P- lg THE 


MACROS 

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR 


GPRML € QSTO6, #0'6'. -1. YES, 1); ! EXTERNAL LOOPBACK 
GPRML ( QSTO7, #0'10', -1, YES. 1); $ SYSTEM HAS BLOCK- 
GPRML ( QSTO4, #0'2’, -1, YES, 1); : 


SEQ 0070 
Page 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS ;: (BERG. DEQNA JNGNA2 .BLI;2 


MODE MEMORY ? 
LOOPBACK CONNECTOR IN DEGNA ? 


¢ 


6 
#) 





G6 


7 
NQNA2 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:47 VAX-11 Bliss-16 V4.0-579 = Avi 7 
v01.0 REPORT CODING SECTION 9-Jul-1984 07:10:19 SPIDERSUSERS : (BERG. DEGQNA JNQNA2.BLI;2 (7) 
3 1616 1 SSBTTL ‘REPORT CODING SECTION’ 

: 1617 1 

; 1618 1 tee 

3 1619 1 : 

3 1620 1 : THE REPORT CODING SECTION CONTAINS T 

3 1621 1 : “PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS. 

3 1622 1 : 

3 1623 1 : THIS SECTION CONTAINS THE CODE FOR PRINTING 

3 1624 1 : STATISTICAL INFORMATION GATHERED BY THE DIAGNOSTIC. IT IS 

3 1625 1 : EXECUTED BY THE OPERATOR COMMAND “PRINT” OR BY MACRO CALL 

3 1626 1 : “DORPT”. USE THE PRINTS MACRO TO PRINT THE INFORMATION. 

3 1627 1 : USE FORMAT STATEMENTS AS IN THE PRINTB/PRINTX MACROS. IT 

3 16235 1 : THE PROGRAMMER'S RESPONSIBILTY TO DEVISE AND IMPLEMENT THE 

3 1629 1 s FORM AND CONTENT OF THE STATISTICS. 

3 1630 1 $-- 

3 1631 1 

3 1632 2 SGNRPT; 

3 16335 2 

; 1634 2 TEMP1 = 1; 

8 1635 2 

3 1636 1 ENDRPT; 


. TITLE NG@NA2 CNQNAAO DEQGNA FUNCTIONAL TEST 
-IDENT /VO01.0/ 
ENABL AMA 


000000 -PSECT ‘sCODES., RO 
000000 104 105 121 LSDVTYP:: erst 
000003 116 101 057 -ASCII /NA/<57> 
000006 115 067 045 ‘ 
000011 060 064 000 eASCII /04/<00> 
000014 -BLKB 
000016 104 105 121 LSDESC::.ASCII /DEGQG/ 
000021 116 101 040 -ASCII /WA / 

106 125 116 ASC 
000027 103 124 111 ASCII /CTI/ 
000032 117 116 101 -ASCII /ONA/ 
000035 114 124 -ASCII A T/ 
000040 105 123 124 ASCII /EST/ 
000043 -ASCII «00> 
000044 .BLKB 2 
000046 000000C LSHROLN: : 

WORD <<<LSNDHRD-LSHRDLN>/2>-1> 

000050 000031 GP$i:: .WORD 31 
000052 000000G -WORD QSTO1 
000054 174440 -WORD -3340 
000056 174460 WORD -3 
000060 001031 GPs2:: .WORD 1031 
000062 000000G -WORD QSTO2 
000064 000300 -WORD 300 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
REPORT CODING SECTION 


000000C 
003130 


177777 
004130 


177777 
001130 


177777 


. WORD 
LSNDHRD: : 
-BLKW 
LSSFTLN:: 
. WORD 
GP$3:: .WORD 
. WORD 
. WORD 
GP$4:: WORD 
. WORD 
WORD 
GP$S:: .WORD 
. WORD 
. WORD 
LSNOSFT:: 
.BLKW 


BIT15== 





H6 


12-Jul-1984 13:05:47 
9-Jul-1984 07:10:19 


1 

<<<L$NDSF T-L$SFTLN>/2>-1> 

3130 

> ae 

4130 

~ ah 

11350 

QST04 

-1 

i 

RESET.DEQNA, IOP.TABLE, HWP. TABLE 
SWP. TABLE, INTERRUPT.FLG, REG.ADR 
IOP .DATA, GET.ADR, TMP.IOP.ADR 
TMP.REG.DATA, TEMP1, TEMP2, TEMPS 
TEMP4, TEMPS, TEMP6, TEMP7, TEMPS 
TEMPS, Q@STO1, QSTO2, QSTOS, GSTO4 
QSTOS, QSTO6, QSTO7, MSG54 


- 100000 


40000 
10000 
4000 
1000 
400 
200 
100 
40 
20 
10 

2 

1 
1000 
400 
200 
100 
40 
20 
10 

4 

2 

1 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNA2 .BLI;2 


SEQ 0072 
Page 


8 
(7) 


NQNA2 
v0O1.0 


000000 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
REPORT CODING SECTION 


000000 012737 000001 000000G 
000006 000207 


; Routine Size: 


EF .START== 
EF .RESTART== 


12-Jul-1984 13:05:47 


9-Jul-1984 07:10:19 


-100000 
LSHRDLN+-2 
LSSFTLNe2 


-SBTTL LRPT REPORT CODING SECTION 
-PSECT AASCODES, RO 


LRPT: MOV 
RTS 
4 words, Routine Bese: 
O words 


; Maximum stack depth per invocation: 


000000 004737 
104425 


000004 
000006 


; Routine Size: 


000207 


000000’ 


4 words, 


; Meximum steck depth per invocation: 


s 1637 1 


#1, TEMP1 
PC 


AASCODES + 0000 


- SBTTL yt! REPORT CODING SECTION 


LSRPT:: JSR 
TRAP 
RTS 


LRPT 


Routine Base: AASCODES + 0010 
2 words 


SEQ 0073 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNA2 .BLI;2 


Page 


9 
(7) 


1634 
1613 


1634 


MN Vt & & & & 68 A 6 GAD 10 10.70 90 710: 910 910 910.10 19 10 10:10: 10 10 PP ee ee ee be be be be ee ee be be pe pe pe pe 


CNQNAAO DEQNA FUNCTIONAL TEST 
INITIALIZE SECTION 


SSBTTL ‘INITIALIZE SECTION’ 


e 
o 


AT THE BEGINNING OF EACH P 


J6 | 
SEQ 0074 


12-Jul-1984 13:03:47 VAX-11 Bliss-16 V4,0-579 Page 10 
99-Jul-1984 07:10:19 SPIDERSUSERS : (BERG. DEQNA JNQNA2 .BLI;2 (8) 


THE INITIALIZE SECTION — THE CODING THAT IS PERFORMED 


THE INITIALIZE CODE IS EXECUTED UNDER F Ve ee THERE 


ARE SUPERVISOR EVENT FLAGS THAT 


ARE USED T 


DIAGNOSTIC KNOW UNDER WHICH CONDITION THE EXECUTION IS TAKING 
PLACE. THE EVENT FLAGS ARE READ USING THE “READEF” 
ja CONDITIONS UNDER WHICH ane INIT CODE IS EXECUTED AND THE 


at ox EVENT FLAGS 


NEW 
EXAMPLE OF EVENT FL 


AG USE: 
_IF READEFCEF. yg te THEN 


START_FLAG = 
DURING THE INIT 


“ MACRO TO OBTAIN P-TABLE 


CODE, USE THE 
INFORMATION FOR DEVICE TESTING. GET ONE UNIT'S INFORMATION IF 
THIS IS A SEQUENTIAL DIAGNOSTIC. NUMBER OF UNITS AVAILABLE IS IN 


A HEADER LOCATION: “LSUNIT”. 


o 

od 
aes 5, 
w 


LOCAL 
START_FLAG, 
DELAY _MULT; 
SETVEC (€140,170000,PRIO7); 


! SETPRI (PRIO7); 
SETPRI (PRIO6); 


START_FLAG = CLEAR_FLG; 
IF READEF (EF _PWR) 
THEN 


BEGIN 
PRINTF (€ MSG54 ); 
INCR COUNT FROM O TO 60 DO 
BEGIN 


DELAY_MULT = 10000; 
DELAY (.DELAY “MULT): 
BREAK; 
END; 
END; 


! SET IF THIS PASS IS A START 
! CONTAINS DELAY FACTOR 
!0DT ROM ADDRESS !JB REV A-O NONA 


! PRIORITY 7 - NO INTERRUPTS ALLOWED 
! MOST INTERRUPTS NOT ALLOWED !JB REV A-O NOQNA 


! CLEAR FLAG BEFORE TESTING IT 
! ARE WE HERE BECAUSE OF POWER FAIL? 


! "THERE WAS POWER FAILURE - WAITING” 
! WAIT APPROX. 60 SECONDS 


! BREAK FOR APT 


of Se GF OF GF GF GF Gf GF GF GF GF GF GF Gt Ge Ss OF Ge GF 4 Se GH Ge GF GF GF Br GF OF OF SH OF Gs oF Os OF Os os 
~ 
~ 
~ 
°o 


MPUMNUASUUUS SSH WWWWWWWUNWNWaUwinn rrr ww 


K6 


12-Jul-1984 13:03:47 
9-Jul-1984 07:10:19 


! IS THIS A START ? 


CNQNAAO DEQNA FUNCTIONAL TEST 
INITIALIZE SECTION 


IF READEF CEF_START) 
THEN 


BEGIN 
START_FLAG = TRUE; 
END; 


i” CLEAR HARDWARE P-TABLE ON A START BEFORE DOING THE GPHARDS 


IF .START_FLAG OR READEF CEF_NEW) OR READEF CEF CONTINUE ) 
THEN ! IF THIS IS A START 


COCAL TABLE _POINTER; 


INCR INDEX FROM O TO HWP_SIZE BY 2 DO 
(HWP_TABLE + . INDEX) = 0; 


See 
* GET BASE ADDRESS OF HARDWARE P-TABLE AND DEGNA I/0 PAGE 
a 


! ZERO OUT THE TABLES 


SEQ 0075 
VAX-11 Bliss-16 V4.0-579 Page 


SPIDERSUSERS : [BERG . DEQNA JNQNA2 .BLI;2 (8) 


! GET P-TABLE ADDRESS 


S 


BEGIN 
IOP_DATA = .HWP_TABLE [ ADDR }; 

“TABLE = .TABLE_POINTER; ! SAVE HW P-TABLE ADDRES 
REG_ADR = .HWP_TABLE [ ADDR }; ! SAVE I/0 PAGE BASE ADDRESS 
GET_ANMR = .HWP_TABLE [ }; ! SAVE I/O PAGE BASE ADDRESS 
TMP_IUP_ADR = .HWP_TABLE [ ADDR }; 


IOP_TABLE { .INDEX } = .TMP_IOP_ADR; 
TMP_IOP_ADR = .TMP _IOP_ADR * 23 
$ 
END; 
END; 
RETURN; 
ENDINIT; 
-GLOBL LSDLY 
.SBTTL CLINIT INITIALIZE SECTION 
000000G LINIT: JSR R1, $SAVE4 
TST -(SP) 
000340 MOV 0340, -(SP) 
114020 MOV @-63760, -( SP) 
000214 MOV 0214,-(SP) 
MOV #3, -¢ 
TRAP 7 
000300 MOV #300 ,RO 


1636 
1671 


1674 


—— 


AO DEQNA FUNCTIONAL TEST 


CNQNA 
INITIALIZE SECTION 


000034 


10%: 


L6 


12-Jul-1984 13:03:47 
9-Jul-1984 07:10:19 


41 
R4 
034 ,RO 
47 


6$ 
@MSGS54 , (SP) 
01,-CSP) 


17 
@75,R2 


RO 
TMP. IOP.ADR, IOP, TABLECRO) 


SE 7 
VAX-11 Bliss-16 V4.0-579 oy l2 
SPIDER SUSERS : [BERG . DEQNA JNQNA2 .BLI;2 (8) 





3 START.FLAG 1676 
$ 1678 
$ 1681 
é SP ,* 

Q *, COUNT 1683 
3 *,DELAY.MULT 1685 
; DELAY.MULT,$$TMP2 1686 
3 #,$STMP1 

s $S$TMP 

3 $STMPL 

; $$TMP2 

s COUNT 1683 
5 1680 
$ 1691 
3 @,START.FLAG 1694 
: START.FLAG 1701 
3 1706 
: 1707 
3 1706 
; 

FY 1713 
; TASLE.POINTER 

: 1716 
; TABLE .POINTER,« 1717 
; HWP.TABLE.* 1718 
; 1719 
3 1720 
; INDEX 1721 
; #,#C INDEX) 1723 


:; Routine Size: 
; Maximum steck 


000000 004737 


000004 
000006 


; Routine Size: 
; Maximum stack 


$ 1730 
8 1731 
3 1732 


104411 
000207 


1 
1 
1 


M6 


12-Jul-1984 15:03:47 


DEQNA FUNCTIONAL TEST 
99-Jul-1984 07:10:19 


CNQNAAO 
INITIALIZE SECTION 


000002 000000G ADD 02, TMP .IOP.ADR 
000002 ADD ¢2,R0 
000016 CMP RO, #16 
BLE 10% 
000012 11$: ADD #12,SP 
RTS C 
100 words, Routine Base: AASCODES + 0020 
deotn per invocation: 15 words 
-SBTTL LSINIT INITIALIZE SECTION 
000020' LSINIT:: JSR PC,LINIT 
TRAP 1 
RTS PC 


4 words, Routine Base: AASCODES + 03550 


depth per invocation: 


SEQ 0077 


VAX-11 Bliss-16 V4.0-579 


P 
SPIDERSUSERS : [BERG.DEQNA JNQNA2 .BLI;2 - 


13 
(8) 
1724 
1721 


1636 


1726 


N6 


SEQ 0078 
NQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:47 VAX-11 Bliss-16 V4.0-579 Page 14 
=e AUTODROP SECTION 99-Jul-1984 07:10:19 SPIDERSUSERS : (BERG . DEQNA JNQNA2 .BLI;2 (9) 


SSBTTL ‘AUTODROP SECTION’ 


- 
* 


THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF 
THE “ADR” FLAG WAS SET. THE UNIT UNDER TEST IS CHECKED TO 
SEE IF IT WILL RESPOND. IF IT DOESN'T IT IS IMMEDIATELY 
DROPPED FROM TESTING. 


7 of G G+ Ge Ge Ge © Ge Ge Ge =e Ge @e Ge oe 
~ 
N 
> 
— 
MMPI Pe Pe ee 


-SBTTL LAUTO AUTODROP SECTION 
000000 000207 LAUTO: RTS PC 


; Routine Size: 1 word, Routine Base: AASCODES + 0340 
; Maximum stack depth per invocation: O words 


; 1729 


-SBTTL LS$AUTO AUTODROP SECTION 
000000 004737 000340’ L$AUTO: : JSR PC ,LAUTO ; 1746 
000004 104461 61 

000006 000207 ats PC 

; Routine Size: 4 words, Routine Base: AASCODES + 0342 

; Maximum steck depth per invocation: 2 words 


: 1749 1 
$ 1750 1 


67 











NQNA2 CNQMAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:03:47 VAX-11 Blies-16 v4.0-579 =, ag 15 
v01.0 CLEANUP CODING SECTION 9-Jul-1984 07:10:19 SPIDERSUSERS : (BERG . DEQNA JNGNA2. BLI:2. oe 10) 
5 1751 1 SSBTTL ‘CLEANUP CODING SECTION’ 
3 1752 1 
S tae 
3 
; 1755 1 : THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 
s 1756 1 : AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 
5 1757 1 : 
$ 1756 1 : INSERT YOUR CLEANUP CODING. THIS CODING SHOULD 
5 1759 1 : RESTORE YOUR TEST-DEVICE TO A NEUTRAL STATE. 
: 1760 1 : THIS CODE WILL BE EXECUTED AFTER EACH PASS AND AFTER THE 
P 1761 1 ! PROGRAM IS INTERRUPTED BY “tC”. 
; 1762 1 $-- 
5 1765 1 
F 1764 2 BGNCLN; 
s 1765 2 
$ 1766 2 RETURN; 
P 1767 2 
5 1766 1 ENDCLN; 
-SBTTL CLCLEAN CLEANUP CODING SECTION 
000000 000207 LCLEAN: RTS PC 3 1748 
s Routine Size: 1 word, Routine Bese: AASCODES + 0352 
; Maximum steck depth per invocetion: O words 


~SBTTL LSCLEAN CLEANUP CODING SECTION 


000000 004737 000352’ LSCLEAN: : 
000004 104412 TRAP 12 

000006 000207 RTS PC 

s Routine Size: 4 words, Routine Base: AASCODES + 0354 


; Maximum steck depth per invocetion: 2 words 


8 1769 1 
3 1770 1 


C7 


NQNA? CNQGNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:03:47 VAX-11 Blies-16 V4.0-579 a8, Pege 16 
vo1.0 DROP UNIT SECTION 9-Jul-1984 07:10:19 SPIDERSUSERS : [ BERG . DEQNA JNQNA2.BLI;2 (11) 
3 ty SSBTTL ‘OROP UNIT SECTION’ 
3 1772 1 
mf 
. os THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
; 1776 , ; TO NO LONGER SE TESTED. 
1 
' i771 INSERT DROP CODE HERE. THIS CODE WILL BE EXECUTED AFTER 
; 1779 1 : A “DROP” COMMAND OR A “DODU” MACRO EXECUTION. THE ae 
t 1760 1 § OR THIS CODE IS TO DO ANY NECESSARY HOUSEKEEPING AFTER A 
F 1761 1 : UNIT HAS BEEN DROPPED. 
3 1762 1 : 
3 1765 1 §-- 
5 1764 1 
3 1765 2 BGNDU; 
3 17866 2 
8 1787 2 RETURN; 
$ 1766 2 
8 1789 1 ENDDU; 
.SBTTL LDU DROP UNIT SECTION 
000000 000207 LOU: RTS PC $ 1768 
; Routine Size: 1 word, Routine Base: AASCODES + 0364 
; Maximum steck depth per invocation: O words 
.-SBTTL LSDU DROP UNIT SECTION 
000000 004737 000364’ L$DU:: JSR PC ,.OU 3 1787 
000004 104453 TRAP 53 
000006 000207 RTS PC 
: Routine Size: 4 words, Routine Base: AASCODES + 0366 
; Maximum steck depth per invocetion: 2 words 


8 1790 1 
3 1791 1 





D7 


NQNA2 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:47 VAX-11 Bliss-16 v4.0-579 _ Ny 17 
vo1.0 ADD UNIT SECTION 9-Jul-1984 07:10:19 SPIDERSUSERS : (BERG. DEQNA )NQNA2. BLI:2. mF 12) 
: 1792 1 SSBTTL ‘ADD UNIT SECTION’ 
3 1793 1 
—. .- 
ee THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
3 1797 1 : TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
; a 1 : TO THE TEST CYCLE. 

1 1 : 
600 1 : } ADO CODE HERE. THIS CODE a or BE EXECUTED AFTER 
: 1601 1 : “ COMMAND. THE PURPOSE OF THIS CODE IS TO DO ANY 
3 ye 1 : HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAS BEEN ADDED. 

1803 1 : 
; 1804 1 $.- 
3 1805S 1 
8 1806 2 BGNAU; 
: 1807 2 
3 1808 2 RETURN; 
$ 1809 2 
3 1810 1 ENDAU; 

.SBTTL LAU ADD UNIT SECTION 
000000 000207 LAU: RTS PC $ 1789 
3; Routine Size: 1 word, Routine Base: AASCODES + 0376 
; Maximum steck depth per invocation: O words 
-SBTTL LSAU ADD UNIT SECTION 

000000 004737 000376’ L$AU:: JSR PC LAU : 1808 
000004 104452 YRAF 52 
000006 000207 RTS PC 
; Routine Size: 4 words, Routine Bese: AASCODES + 0400 
; Meximum stack depth per invocation: 2 words 


3 1811 1 
s 18i2 1 


000000 012737 


; Routine Size: 
; Meximum stack 


~ 
@ 
~ 
o 
— MMM Pf fut flr 





E/ 


12-Jul-1984 13:03:47 


DEQNA FUNCTIONAL TEST 
99-Jul-1984 07:10:19 


CNQNAAO 
ADD UNIT SECTION 


BGNSRV (NXM_INT); 


fad 
& 


GLOBAL LOCATION “INTERRUPT_FLG” IS SET TO TRUE WHICH INDICATES 
THE INITIALIZATION SEQUENCE INTERRUPT OCCURED. 


INTERRUPT _FLG = 60'177777'; 
ENDSRV; 


-SBTTL NXM.INT ADD UNIT SECTION 


177777 000000G NXM. INT: : 
a 4 @-1, INTERRUPT .FLG 


4 words, Routine Base: AASCODES + 0410 
depth per invocation: O words 


1 
1 END 
0 ELUDOM 
OTS externel references 
-GLOSGL *sSAVE4 
PSECT SUMMARY 
Psect Name Words Attributes 
$CODE $ 40 RO. I ,. (Cl. REL. CON 
AASCODE $ 136 RO. I , tC, REL. CON 
Library Statistics 
occecene Symbols -------- Pages 
File Totel Loaded Percent Mapped 


SPIDER SUSERS : [BERG.DEQNA JOQNALIB.L16;5 223 48 21 a4 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNA2. purse. 


Time 
00:00.0 


SEQ A aay 
18 
om 13) 


1823 
1814 


Sa F7 


NQNA2 NQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:03:47 
v01.0 ADD UNIT SECTION 9-Jul-1984 07:10:19 
3 COMMAND QUALIFIERS , 
3 BLISS/PDP11/ENV:NOEIS NQNA2.BLI/LIST=NQNA2.LIS/OBJECT =NQNA2 . OBJ/SOURCE «PAGE : 53 
Size: 136 code + 40 date words 
Run Time: 00:13.3 


El Time- 00:21.4 
Cine CPU Ain: 8259 
_———— es 5 — 
Memor : pages 
Comp: iat ior Complete 


SEQ 0063 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : (BERG. DEQNA JNQNA2 .BLI;2 


Pege 19 
(13) 


Here meree OOOO0O 


CNQNAAO DEGNA FUNCTIONAL TEST 


G/ 


12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 
21-Jun-1984 08:36:17 SPIDER SUSERS : (BERG. DEQNA JNONA3 .BLI;1 


SEQ 0084 
Page 


MODULE NQNAS a ‘ CNQNAAO DEQNA FUNCTIONAL TEST’ 


vO1.0', 
ADDRESSING_MODEC ABSOLUTE ) 


) = 
SSBTTL ‘DEQNA TEST DEFINITION MODULE’ 
BEGIN 
*<BLF /FORMAT> 


LIBRARY ‘QNALIB‘; 
REQUIRE ‘BLSMAC.REQ’; 


! QNALIB LIBRARY 
! DIAGNOSTIC SUPERVISOR LIBRARY 


1 
(1) 


> Pe ee bee fet be fet at bee fee et ft bt fe at fe eh fe fd Be fe bh Bt fe fd ad ee fe Be fk ed ht ee ee ee 


CNQNARO DEQNA FUNCTIONAL TEST 
DEQNA TEST DEFINITION MODULE 


PSECT 
CODE = ABSCODES; 


EXTERNAL ROUTINE 


CHK _CSR_STATUS 
CHK _RIXI_STATUS 
TATUS 


-RCV_S 
CHK _XMIT_STATUS 
CLR ERS 


TURN_OFF_LED 
VER_DESCR_STATUS 
WAIT _FOR_TIMEOUT 
WALKING BIT 
WRT_STATION_ADR 
XMIT_AND_RCV_PACKET 
XMIT_ILOOP_PACKET 
XMIT_SETUP_PACKET 


EXTERNAL DATA USED BY THIS MODULE 





H7 


SEQ 0085 
12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 Page 2 
21-Jun-1984 08:36:17  SPIDERSUSERS: (BERG.DEQNAJNONA3.BLI;1 (2) 


! PRINT EXTENDED ERROR MESSAGE 
! PRINT EXTENDED ERROR MESSAGE 


! NXM INTERRUPT SERVICE ROUTINE 


el eel onl el el aeh eel eel oe ol oe el ol oe oe ed ed ed dd od dh ed OL Lederer ed ee ee ee 


I/ 


12-Jul-1984 13:04:10 





NQNAAO DEQNA FUNCTIONAL TEST 
DEONA TEST DEFINITION MODULE 21-Jun-1984 08:36:17 
EXTERNAL 
See 
: COMMUNICATION AREA DECLARATIONS 
© us an 

RCV_D_LIST : BLOCK [{ D_SIZE, WORD ) FIELD ( OL_FIELDS ), 
XMIT_O_LIST : BLOCK [ O_SIZE, }) FIELD ( OL_FIELOS ), 
DESCR_LIST : BLOCK DESCR_SIZE, WORD) FIELD ( OL_FIELDS ), 
RCV_BUFFER : VECTOR { B_SIZE, BYTE ). 
XMIT_BUFFER : VECTOR { B_SIZE, BYTE 
DATA_BUFFER : { BUF_SIZE, BYTE }, 
TARGET _ADR : T_SIZE, 8 ‘ 
PHYS_ADR : 22, BYTE }, 
1oP_ TABLE : f 8, 
RD13 : 64 
TO013 : 28 
TO016 : a4 
BD_ ¥ : CTOR { 8D 
STATION_ADR : { 4, 
&. : { 8, 
8 
: HARDWARE AND SOFTWARE P-TABLE 
Bom 
HWP_TABLE : REF BLOCK ( HwP_ 
SWP_TABLE : REF BLOCK [{ SWP_ 
REG_ADR : REF REG 
GET_ADR : REF ADR 
ICP _DATA : REF REG_STR 


SEQ Paras 
VAX-11 Bliss-16 V4.0-579 Paye 
SPIDERSUSERS : (BERG .DEQNA JNQNAS.BLI;1 


3 
(3) 


Po ee be te be ee ee fe ee pee fe fee fe fe ee bee pe ee fet ee ee 


J7 


SEQ 0087 
CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15:04:10 VAX-11 Bliss-16 V4.0-579 Page 4 
DEQNA TEST DEFINITION MODULE 21-Jun-1964 08:36:17 SPIDER SUSERS ; (BERG. DEQNA JNQNA3.BLI;1 (4) 


! CO*NONE, -1*L-CLOCK,1=P_CLOCK) 
Se 
ey MISCELLANEOUS DATA DECLARATIONS 


XBUF _LENGTH, RBUF _LENGTH, INTERRUPT _FLG, COUNTER, 

Swe _BLOCK_MEM, SWP_TOUT_VAL, SWP_ILOOP, SwWP_TIMER, 
up_COUNTER, DOWN_COUNTER, CHECKSUM, ERR_NUMBER, 
C_FLAG, SWP_LBC, 

ERR_COUNT, ERR_FLAG, CSR_WORD, PRIOO, 

PRIO1, PRIO2, PRIO3, PRIO4, 

PRIOS, PRIO6, PRIO7, DEQNA_NO : WORD, 


TEMPORARY STORAGE DATA DECLARATIONS 


Pl, P2, P3, P4, 
TMP_IOP_ADR, TMP_REG_DATA, TEMP1, TEMP2, 
TEMP3, TEMP4, TEMPS, TEMP6, 
TEMP7, TEMPS, TEMPS, TADR1, 
TADR2 $ WORD. 
TBYTE1. TBYTE2, TBYTES, TBYTES =: BYTE, 


P= > ee be be be be pe po be pee ee ee Bee pee 


no ee 


C7 
, SEQ 0088 
CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-!6 v4.0-579 soe =(S 
DEQNA TEST DEFINITION MODULE 21-Jun-1984 08:36:17 SPIDERSUSERS:(8ERG.DEQNA)NQNAS.BLI;1 (5) 
Se 
+ ERROR MESSAGES DEFINED EXTERNALLY 
Soe 
MSGOO, MSG71. 
MSGO1, MSGO2, MSGO3, MSGO4, , MSGO6, MSGO7, : , MSG10, 
MSG11. MSG12, MSG13. MSG14, MSG1S, MSG16, MSG17, MSG18, MSG19, . 
. MSG22, . MSG24, , MSG26, MSG27, MSG28, , MSG30, 
MSG31. MSG32. MSG33, MSG34, MSG35, MSG36, MSG37, MSG38, MSG39, , 
* MSG42, MSG43, MSG44, 5, MSG46, MSG47, : , MSGS5O, 
1. MSGS2, MSGS53, MSGS54, S, MSGS6, MSGS7, MSGS8, , MSG60, 
* MSG62. MSG63, MSG64, , MSG66, MSG67, : , MSG70; 


of GF GF GF GF OF GF OF OF GF GF OF GF OF GF GF GF Ge OF OF GH we GF OF Ge oF oe Oe OF os © os OF os 


Pe he te eh te ee be fe he be be Bet be bee fe ee ee bee ee be Pe ee ee ee pe ee ee ee ee ee pe 


L/ 


CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST 21-Jun-1984 08:36:17 SPIDERSUSERS ;: [BERG .DEQNA JNQNAS .BLI;1 


SSBTTL ‘TEST 1 - NON-EXISTANT I/O PAGE REGISTER TEST’ 
See 
a 


SEQ 0089 
Page 


TEST 1: NON-EXISTANT I/O PAGE REGISTER TEST 


DESCRIPTION: 


This test verifies that all the device registers residing in the 
I/0 Page can be accessed without forcing a non-existant memory (NXM) 
interrupt. If the operator specifies loop on error, the —— 
re-executes the code that detected the error until fC is entered. 


Hardware tested: Q-Bus to DEQNA Sleve Registers Interface 
Processing: 


BEGIN 
Ra for NXM interrupt 
AT for every I/0 page register 
read I/0 page register 
IF NXM occured 
THEN 
en error message if not inhibited 


END 
ENOREPEAT 
write any data pattern into the first 2 I/0 page 


_ error message if not inhibited 


6 
(6) 


HP UWWWWE ADVIS OADDAMNSWWUWWE BONS IIODADSA BUNUN 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 1 - NON-EXISTANT I/O PAGE REGISTER TEST 


BGNTST; 


SETVEC (4, . + PRIO7); 
DELAY (MS_DELAY 
INTERRUPT_FLG = CLEAR _FLG; 


TMP_IOP_ADR = .HWP Ts { ADDR }; 
MoeSIN FROM O TO 7 DO 


TEMPA = ..TMP_IOP_ADR; 
DELAY(7); 


IF UINTERRUPT_ FLG EQLU WORD_LIMIT 
THEN 


BEGIN 
INTERRUPT_FLG = CLEAR_FLG; 
PRINTB ( MSG59 ); 
PRINTS (€ MSG70, TMP _ IOP_ADR ); 
ERRDF (0101, MSGOO, E1$REPORT); 
DODU (€ DEQNA_NO ); 
DOCLN; 
END; 
ENDSUB; 


—— = .TMP_IOP_ADR + 2; 


TMP_IOP_ADR = .HWP_TABLE [ ADDR }; 
INCR INDEX FROM O TO 1 DO 
BEGIN 


: 
. TMP_IOP_ADR = #X‘7F'; 
DELAYC(7); 
IF .INTERRUPT_FLG EQGLU WORD_LIMIT 

THEN 
BEGIN 
INTERRUPT_FLG = CLEAR_FLG; 
PRINTB ( MSGS9 ); 


PRINTB ( MSG70, “THP_ IOP_ADR ); 
ERRDF (0102, MSGOO, E1$REPORT); 
DODU NO ); 


ENDSUB; 
TMP_IOP_ADR = .TMP_IOP_ADR + 2; 


END; 
CLRVEC (4); 
ENDTST; 


TITLE 
-IDENT /VO01.0/ 


M/ 


12-Jul-1984 13:04:10 
21-Jun-1984 06:36:17 


SEQ wens 
SPIDER SUSERS : [BERG . DEQNA JNQNA3.BLI;1 _ 


VAX-11 Bliss-16 V4.0-579 


! SET UP FOR AN NXM INTERRUPT 
! DELAY SO x a om = 5 ms 
! CLEAR OUT NEX FLAG 


! SEE IF WE GOT A NXM INTRT 
! ADDRESS NOT THERE 
! CLEAR TRAP FLAG 


! ‘I/O PAGE REG. NOT PRESENT’ 


! WRITE FIRST 2 LOCATIONS 

! SEE IF WE GOT A NXM INTRT 
! ADDRESS NOT THERE 

$ CLEAR TRAP FLAG 


! ‘I/O PAGE REG. NOT PRESENT* 


! CLEAR INTERRUPT VECTOR 


NGNA3 CNQNAAO DEGNA FUNCTIONAL TEST 


7 
(7) 


N7 
SEQ 0091 

NQNA3 CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 Page 8 
v01.0 TEST 1 - NON-EXISTANT I/O PAGE REGISTER TEST 21-Jun-1984 08:36:17 | SPIDERSUSERS:(BERG.DEQNA]NQNA3.BLI;1 (7) 

.ENABL AMA 

.GLOBL CHK.CSR.STATUS, CHK.RIXI.STATUS 

“GLOBL CHK.RCV.STATUS, CHK.XMIT.STATUS 

"GLOBL CLR.BUFFERS, CLR.DESCR, COMPARE.PACKETS 

"GLOBL E1$REPORT, ERROR$REPORT, FORM. HEX. ADR 

"GLOBL PWR.INT, RESET.DEQNA, SEND. ELOOP . .PACKET 


GLOBL ven Desh TATU, "TURN. OFF. LED 


-GLOBL RCV.D LIST. XMIT. 0. LIST, DEscR. iisT 
L 
aa COUNTER, SWP .BLOCK .MEM, or our VAL 


DEQNA.NO, P1, P 
-GLOBL TMP.REG.DATA, TEMP1, TEMP2, TEMPS 
-GLOBL TEMP4, TEMPS, TEMP6, TEMP7, TEMPS 
“GLOBL TEMPS, TADR1, TADR2, TBYTE1, TBYTE2 
“GLOBL TBYTES, TBYTE4, MSGOO, MSG71, MSGO1 
: MSGO2, MSGO3, MSGO4 MSGO6 


: : MSG64 MSG66 

-GLOBL MSG67, MSG€8, MSG69, MSG70, LSDLY 

.SBTTL $T1 TEST 1 - NON-EXISTANT I/O PAGE REGISTER TEST 
000000 -PSECT ABSCODE$, RO 
000000 004137 000000G $Ti: JSR — ; 1611 
000006 012746 000000G MOV #PRIO7, -C SP) : 1650 





000010 


000000G 177777 


000000G 
0000006 
000001 


000000G 
0000006 


CNGNAAO DEQGNA FUNCTIONAL TEST 
TEST 1 - NON-EXISTANT 1/0 PAGE REGISTER TEST 


dio Gg280 gEEECRG*RRRCRLESS GaECPRARCEERS G222 


B8 


@NXM. INT. -CSP) 
04, - SP) 
“. -(SP) 


f 
INTERRUPT .FLG 


@HuP . TABLE, TMP. IOP. ADR 


010,R2 


2 
@TMP.IOP.ADR, TEMP1 
67,R1 


6$ 

INTERRUPT .FLG 
OMSGS9, (SP ) 
61. -(SP) 

SP ,RO 


14 
TMP . IOP .ADR.( SP) 
(SP) 


$ 
02, THP.IOP.ADR 
R2 
S$ 


12-Jul-1984 13:04:10 
21-Jun-1984 06:56:17 


VAX-11 Blies-16 V4.0-579 Page 
SPIDERsUSERS : (BERG . DEQNA JNGNAS .6LI;1 


*,$sTMP2 
@, Sst) 


$$TMP 
SSTMP) 


_SSTMP2 


¢, INDEX 


@, $sTMP2 
eo, $$TMPl1 


$$ TMP 
$$TMP1 


$sTMP2 


SP, 


$ 
; INDEX 





SEG 0092 


9 
(7) 


1651 


1660 


1665 
1664 


1665 


1666 


000452 


; Routine Size: 
; Maximum steck depth per invocation: 


000000 004737 000000’ Tis: 
000000 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST 


000000G 000000G MOV 
000002 MOV 
11%: TRAP 
000177 000000G MOV 
000007 MOV 
12%: BEQ 
000000G MOV 
BEG 
000010 13%: CLR 
DEC 
BNE 
14$: DEC 
BR 
000000G 177777 15%: a 
000000G CLR 
000000G MOV 
000001 MOV 
MOV 
TRAP 
000000G MOV 
000000G MOV 
000002 MOV 
MOV 
TRAP 
TRAP 
. WORD 
. WORD 
. WORD 
000000G MOV 
TRAP 
TRAP 
000006 ADD 
16%: TRAP 
ROR 
BLO 
000002 000000G ADC 
DEC 
BNE 
000004 MOV 
TRAP 
000012 ADD 
RTS 
150 words. Routine Base: ABSCODES 
13 words 
. SBTTL 


1%; 


JSR 


C8 


12-Jul-1964 13:04:10 
21-Jun-1984 08:36:17 


— 


2 
©177,aTMP .IOP.ADR 
7,R1 


$ 
 pinaideateaaaaiang 
INTERRUPT .FLG 


@mSG59, (SP) 
61, -(SP) 
SP RO 


11% 
ea 


Ti TEST 1 - NON-EXISTANT 1/0 PAGE REGISTER TEST 


PC,$T1 


VAX-11 Blies-16 V4.0-579 my 10 
SPIDERSUSERS : [BERG . DEQNA JNQNAS.BLI;1 (7) 
; 74 
3s Fe INDEX ‘$75 
3 He 
3; *,$8TMP2 1679 
3 *, $¢TMPl1 

3 $STMP 

3; $sTMPl1 

3 $$TMP2 

5 1680 
3 1683 
$ 1684 
; SP, 

3 1685 
3 SP, s 

; 1686 
; 1687 
3 1682 
3 1689 
3 1691 
; INDEX 1675 
; 1694 
; 1611 
; £694 





D8 


NQNA3 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04 . \ee- : SEQ 0094 
vo1.0 Hae AO EON EXISTANT 170 PAGE REGISTER TEST 21-Jun-1984 08:36:17  SPIDERSUSERS:{ BERG. DEQNAJNONAS,6LI,1 °%* 
000004 104466 TRAP 66 

000006 006000 ROR = RO 

000010 103773 BLO Osi18 

000012 000207 RTS PC 

; Routine Size: 6 words, Routine Base: ABSCODES + 0454 


; Maximum stack depth per invocation: 2 words 


3 1697 1 
3 1698 1 








2 Pe Be be te bt Pe Bet bat ft bt et fee fet fet fe fe fe fet fe Pe fe fe fd Pe be fe fe hed a fd Pe fe Bee bee ee ee Pe he be pee ee ee ee pe 


SEQ_0095 
FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Blies-16 V4.0-579 Page 


CNQNAAO DEQNA 12 
TEST 2 - CSR STATIC BIT TEST 21-Jun-1984 08:36:17  SPIDERSUSERS: (BERG.DEQNA)NQNAS.BLI;1 (8) 
SSBTTL ‘TEST 2 - CSR STATIC BIT TEST’ 


See 


TEST e2: CSR STATIC BIT TEST 
DESCRIPTION: 


This test verifies that the CSR register static bits can be set 
and cleared as specified. The host writes date patterns to this 
register and reads them beck verifying no static 
(stuck et 1 / stuck at 0) faults occur. If the operator specifies 
loop on error, the program re-executes the code that detected the 
error until tC is entered. 


Herdwere tested: Q-Bus to DEQNA Sleve Regs. Interface 


BEGIN 
a Spears Goes 6 Se ) ore in the CSR for stuck et 0 


IF error 
THEN 
oo error message if not inhibited 


set static bits ( 0.3.8.9 ) and check for expected CSR status 
IF error 
THEN 

geist error messege if not inhibited 


clear stetic bits and check for expected CSR status 
IF error 


THEN 
a error message if not inhibited 


set static bits ( 0.3.8.9 ) and check for expected CSR stetus 
IF error 
THEN 
ot error message if not inhibited 
reset DEQNA and check for expected CSR status 
IF error 
THEN 
a error message if not inhibited 





F8 


NQNA3 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Blies-16 V4.0-579 a” Page 13 
v01.0 TEST 2 - CSR STATIC BIT TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : [BERG .DEQNA )NONA3S.BLI;1 (9) 
; 1746 3 BGNTST; 

; 1747 3 

: 1748 5 BGNSUB ; 

: 1749 5 

; 1750 5 te 

3 1751 : * CHECK IF CSR STATIC BITS (BIT 0.3.8 AND 9) ARE NOT STUCK AT O 
3 1752 $- 

3 1753 5 

: 1754 5 )3 

3 1755 5 PuT_BIT ( CSR, ALL BITS, PATRNI ); 

; 1756 5 DELAY ( TIME6_LIMIT ); 

; 1757 S TEMP1 = GET_BIT [ CSR_ALL ] AND PATRNI1; 

3 1758 5 IF .TEMP1 NEQU PATRNI 

: 175° 5 

: 1760 6 

; 1761 6 PRINTB ( MSGS9 ); 

3 1762 6 PRINTS ( MSG6O ); 

3 1764 6 ERRDF ( 0201, MSGOO, E1SREPORT ); 

: 1765 5 END; 

3 1766 3 ENDSUB; 

; 1767 3 

: 1768 3 See 

3 a. : : CHECK IF CSR STATIC BITS (BIT 0,3,8 AND 9) ARE NOT STUCK AT 1 
$ > ae 

3 1771 3 

3 1772 5S BGNSUB; 

3 1773 5 PuT_BIT . CSR, ALL_BITS, ZERO ); 

3 1774 5 DELAY ( T LIMIT ); 

3 1775 5 TEMP2 = GET_BIT { CSR_ALL ] AND PATRNI; 

3 1776 5 IF .TEMP2 NEQU ZERO 

8 1777 5 THEN 

3 1778 6 

3 1779 6 PRINTB ( MSGS9 ); 

; 1780 6 PRINTB ( MSG61 ); 

3 1781 6 PRINTB ( MSG3O, .GET_ADR { CSR_AlL ], .TEMP2, ZERO ); 
3 1782 6 ERRDF ( 0202, MSGOO, ELSREPORT ); 

3 1783 5S END; 

s 1784 3 5 

s 1785 3 

3 1786 «5S BGNSUB ; 

$ 1787 5 PUT_BIT ( CSR, ALL_BITS, PATRNI ); 

3 1788 5 RESET_DEGNA ( ); 

3 1789 5 TEMPS = GET_BIT [ CSR_ALL ]) AND PATRNI; 

$ 1790 5 IF .TEMP3 NEGU ZERO 

3 1791 5 THEN 

3 1792 6 BEGIN 

s 1793 6 PRINTS ( MSG59 ); 

3 1794 6 PRINTS (€ MSG62 ); 

$ 1795 6 PRINTB ( MSG30, .GET_ADR [{ CSR_ALL ], .TEMP4, ZERO ); 
s 1796 6 ERROF ( 0203, MSGOO, ELSREPORT ); 

3 1797 5 END; 

$ 1798 3 ENDSUB; 





CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 2 - CSR STATIC BIT TEST 


ENDTST; 


000000G 
000016 
000000G 
000000G 
001411 000016 
000001 


000000G 


000016 
176 


000000G 
000001 


000000G 
000001 


000016 


000000G 
000016 


366 000000G 
000000G 001411 


$Te: 
1$: 


6$: 


7$: 


-SBTTL $T2 TEST 2 - CSR STATIC BIT TEST 
JSR $SAVE2 


PESPRse ess 33383 2338 
eS POSES REE ECS SESSES ESSE BSS SS ASE 


G8 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


Ri, 
#16,SP 


2 

PC ,RESET.DEQNA 

REG. ADR,R1 

#1411,16(R1) 

#1,R2 

S$ 

LSDLY,RO 

43 

14(SP) 

RO 

3% 

2¢ 
16(R1),¢SP) 
SP), TEMP 


C 
0176366, TEMP1 
TEMP1, 01411 


gevrengien 
a. Ser 
gor 
~ 2.8 
ee 


SEQ Pg 


VAX-11 Bliss-16 V4.0-579 v age 
SPIDER SUSERS : [BERG .DEQGNA JNQNA3.BLI;1 


«,$$ MP2 
o,$$TMPi 


$$TMP 
$$TMP1 


$sTMP2 


¢, TH .LOCATION 
TMP .LOCATION.« 


SP ,¢ 


SP ,« 


¢, TMP .LOCATION 
e, TMP .LOCATION 
TMP .LOCATION, 


SP. 


Lé 
(9) 


1763 


1764 


1760 
1765 


1766 
1773 


012702 


© DEQNA FUNCTIONAL TEST 


CNQNAA 
TEST 2 - CSR STATIC BIT TEST 


000001 


000016 


000000G 
001411 
000000G 


000000G 
000016 


000010 
176366 


8$: 
9%: 


10$: 
000004 11$; 


000016 


000010 
000000G 
000000G 


000000G 


000001 


000000G 


000001 


SORR88E02 G58 E 55 gqEzzzEEE 


3 


TRAP 


gs 


H8 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


t 
16(R1),4¢SP) 
4(SP), TEMP2 
0176366, TEMP2 


ieee 

v~ Se 
om 

€ 


2 

o 

ss « 

aS 

tm | 

Bi 
“ww 
a 
J 


A 
~4q 


a 
is 


REG. ADR ,RO 
#1411, 16(RO) 
PC DE 


-ADR,RO 
16(RO), 100 SP) 
10( SP), TEMPS 
-+ | petataecii 





SEQ 0098 
VAX-11 Bliss-16 V4.0-579 Page 15 
SPIDERSUSERS: [BERG .DEQNA INQNAS.BLI;1 (9) 
*,$$TMPL 
$$TMP 
$sTMPi 
$sTMP2 
*, TMP .LOCATION 1775 
TMP .LOCATION, « 
1776 
1779 
SP ,« 
1780 
SP ,* 
| 1781 
*, TMP .LOCATION 
¢, TMP .LOCATION 
TMP .LOCATION, « 
SP ,« 
1782 
1778 
1783 
1784 
1787 
1788 
1789 
«, TMP .LOCATION 
TMP .LOCATION, « 
1790 
1793 
SP,« 
1794 


; Routine Size: 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 2 - CSR STATIC BIT TEST 


000016 


200 words, 


14%: 


Routine Base: ABSCODES 
words 


; Maximum stack depth per invocation: 19 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 


3 1801 


004737 
104466 
006000 
103773 
000207 


1 


3 1802 1 


0004 70' 


6 words, 


18 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


T2 TEST 2 - CSR STATIC BIT TEST 


PC,$T2 
66 


RO 
i$ 
PC 


Routine Base: ABSCODES + 1310 
; Maximum stack depth per invocation: 2 words 


VAX-11 Bliss-16 V4.0-579 Page 
SPIDERSUSERS : (BERG. DEQNA JNQNA3.BLI;1 





i SP ,« 


+, TMP .LOCATION 
¢, TMP .LOCATION 
TMP .LOCATION, « 


SP ,* 


=. 0099 


16 
(9) 


1795 


1796 
1792 


1797 


1696 


1796 


J8 


OR (not essigned to DEGNA space): 
OR (multicest bit set): 


f 


Px tn error message if not inhibited 
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: 1803 1 SSBTTL ‘TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST’ 

; 1804 1 See 

3 18605 1 : 

: 1806 1 : TEST 3: ETHERNET STATION ADDRESS VERIFY TEST 

; 1807 1 : 

: <—. : : DESCRIPTION: 

3 1 : 

: 1810 1 : This test verifies that the Ethernet Station Address PROM cen be 

; 1611 1 : read and loaded to host memory correctly. Ethernet Station Address is 
; 1612 1 ! verified and checksum is computed from date read and this checksum 
; 1813 1 : isc to the checksum stored in the Ethernet Station Address 

; 1614 1 ¢ PROM. Ethernet Station Address is always printed out on the console in 
; 1615 1 : the Ethernet standard format. If the eddress 8 not proper, the error 
: 1616 1 : is recorded and an appropriate error message is — out on the 

; 1617 1 : console. If the operator specifies loop on error, the program 

: ae ; : re-executes the code that detected the error until fC is entered. 

3 — 

: 1620 1 : Hardware tested: Station Address PROM 

3 1821 1 : Q-Bus DMA Interface 

3 1822 1 : Processing: 

3 1823 1 : 

3 18624 1 : BEGIN 

3 18625 1 ° 

3 1626 1 : read DEQGNA Station Address PROM and checksum 

3 1627 1 : save copy of Station Address PROM in host memory 

s 18626 1 : print Station hdivane on the console in standard format 

$ 1629 1 : compute Station Address Ron check sum 

8 18630 1 : IF checksum read not equel checksum computed 

(RET oe 0 net innibites 

+ . print error message : nmi 

3 1833 1 : ENDIF 

3 1834 1 : IF Stetion 

3 18635 1 : ell O's 

3 1636 1 : OR {ell i‘s): 

3 1 g 

3 1 8 

3 1 : 

3 + om 

3 1 : 

s 1 : 

3 1 : 

s 1 : 


K8 
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BGNTST; 
BGNSUB ; 
RESET_DEQNA ( ); 
FORM_HEX_ADR ( PHA_INDEX ); 
See 
: COMPUTE EXPECTED CHECKSUM 
CHECKSUM = O; 
oe FROM O T0 5 BY 2 DO 
i AND #0'100000' ) NEQU ZERO 
BEGIN 
CHECKSUM = .CHECKSUM f 1; 
CHECKSUM = .CHECKSUM + 1; 
END 
ELSE 
CHECKSUM = .CHECKSUM * 1; 
CHECKSUM = .CHECKSUM + .STATION_ADR [ .COUNTER }; 
ws — GTRU WORD_LIMIT 
CHECKSUM = .CHECKSUM + 1; 


COUNTER = .COUNTER « 1; 
END; 


*@ 
> 


PRINT PHYSICAL STATION ADDRESS 


TB ( MSGO1, .HWP_TABLE [ ADDR ] ); 
TB ( PHYS_ADR ); 


BD” 
zz 


I 


+ 


"READ ACTUAL CHECKSUM FROM DEGNA STATION ADDRESS PROM AND COMPARE IT TO 
THE EXPECTED CHECKSUM COMPUTED ABOVE. 


DELAY ( 5S ); 

TEMP1 = REG.AOR { 1, ALL_BITS ); 

TEMP1 = .TEMP1 ft 

TEMP2 = .REG_AOR 0, ALL BITS J 

STATION_ADR { CHSUM ] TEMP1 OR ( .TEMP2 AND #0°000377' ); 
PuT_BIT ( CSR, LB, ZERO ); 

r ,crecksun NE QU STATION. ADR ({ CHSUM } 


. Oe G2 Ge Gs SF Ge Gt SF Ge GF GF GF Ge GF GH Ge Ge GF GF Ge GF GF GF GF OF GF GF GS Gs GF GF GF Ge GF GF Ge Ge a Ge GF GF OF Os Gs GF Ge OF OF Ge OF Ge os 
~ 
@ 
™~ 
mM 
PASSA AAAI UIA IID DADA AAHAAA YVAN OOOYVUYUUYNUUUYUUW 


or Sf Gf Gf Gf Ge G+ Ff GF GF GF @F Ge Gr Gs OF 4s @F @s OF OF oF Se os os 
~ 
Oo 
~ 
© 
MUWNWP Paha aWE LS PWWWWWWYADAG 


L8 


2-Jul-1984 13:04:10 


AO DEQNA FUNCTIONAL T 
-Jun-1984 08:36:17 


CNQNA EST 1 
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 21 


BEGIN 
PRINTB ( MSGS9 ); 
PRINTB ( MSG63, .STATION_ADR [ CHSUM ], .CHECKSUM ); 
ERRDF (0301, MSGOO, E1LSREPORT); 
END; 
ENOSUB; 


TEMPS = ZERO; 


INCR INDEX FROM O TO 2 DO 
TEMPS = . TEMPS + ( .STATION_ADR [ .INDEX ] AND SX'FFFF’ ); 


IF ( . TEMPS EQLU ZERO ) 
OR ( . TEMPS EQLU SX‘FFFF' ) 
OR (C .STATION_ADR [ ZERO } a. #X'0100' ) EQLU #x‘0100' ) 
OR ( .STATION_ADR { ZERO } NE X'AAOO' ) 
OR C STATION. -ADR [ ONE ] GTRU Osx" O4FF ) 


BEGIN 
PRINTB ( MSGS9 ); 
PRINTB ( MSG64 ); 
PRINTB ( PHYS_ADR ); 
( 0302, MSGOO, E1LSREPORT); 
END; 
ENDTST; 

.SBTTL $73 TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 
000000G $T3: JSR R1, $SAVE2 : 
000006 SUB e 

1$: TRAP : 
000000G JSR PC RESET .DEQNA 3 
000023 MOV @23,-CSP) $ 
000000G JSR »F ORM. HEX. ADR 
000000G CLR ; 

CLR Ri ; INDEX 
000000G 2s: yo 4g CHECKSUM, RO : 
100000 000000G a #- 100000 , CHECKSUM ; 
000000G MOV RO, CHECKSUM ; 
000000G — : 

: 
000000G 3$: MOV RO, CHECKSUM : 
000000G 4$: 44 o_o ; 
000000G 000000G ADD STATION. ADRCRO), CHECKSUM 
000000G INC COUNTER ; 

000002 ADD #2,R1 ; *, INDEX 
000005 CMP R1,05 ; INDEX,* 

BLE 2$ 
000000G MOV @HWP . TABLE , (SP) : 
000000G MOV #MSGO1,-CSP) 


VAX-11 Bliss-16 V4,0-579 


SEQ 0102 


Page 19 
SPIDER SUSERS : (BERG. DEQNA JNQNA3.BLI;1 (11) 


012746 


AO DEQNA FUNCTIONAL TEST 


M8 


12-Jul-1984 13:04:10 


Test 3 - ETHERNET STATION ADDRESS VERIFY TEST 21-Jun-1984 08:36:17 


000002 


9$: 


10$; 


SOCDERGR Gg gEeEEEE Gzzz 


#2, -CSP) 
SP.,RO 


14 

@PHYS.ADR, (SP) 
$1, -(SP) 

SPR 


14 
REG.ADR,RO 
#1400, 16(RO) 
#5 ,R2 

8$ 

LSDOLY,R1 

7$ 

14( SP) 

Ri 

6$ 

Re 

S$ 

2(RO), 10(SP) 
10(SP), TEMP 1 


#1400, 16(RO) 
eee 
@MSG59, (SP) 

#1,-CSP) 

SP RO 

CHECKSUM, (SP) 

STATION. ADR+6, -CSP) 
@MSG63, -(SP) 


#3,-CSP) 


R 
STATION. ADRCRO), TEMPS 
#2,R0 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG . DEQNA JNQNA3 .BLI;1 


; SP, 


SP ,* 


*,$$TMP2 
s+, $STMP1 


$$TMP 
$$TMP1 


$s$TMP2 

*, TMP .LOCATION 
TMP .LOCATION, + 
+, TMP -LOCATION 
TMP .LOCATION, « 


TEMP2 , + 


INDEX 
*C INDEX), # 
*«, INDEX 


SEQ 0103 
Page 20 
(11) 


1882 


1889 
1890 


; Routine Size: 
; Maximum stack depth per invocation: 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 
: Maximum steck depth per invocation: 2 words 


004737 
104466 
006000 
103773 
000207 


: 1923 1 
3 1924 1 


DEQNA FUNCTIONAL TEST 


N8 


12-Jul-1964 13:04:10 


CNQNAAO 
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 21-Jun-1984 08:36:17 


000004 


000000G 11$: 
000001 
000001 
000001 
000010 
000006 12$: 
182 words, Routine Base: 
16 wor 
001324' T3:: 
1$: 


6 words, 


RTS 


AB $CODE $ 
ds 


‘ 
— 
eee 
STATION. ADR+2, 02377 
12$ 


T3 TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST 


PC,$T3 
66 


RO 
1$ 
PC 


Routine Base: ABSCODE$ + 2100 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNAS .BLI;1 


; INDEX,« 


SEQ 0104 
Page 21 
(11) 


1909 
1910 
1911 
1912 
1913 
1916 


1917 


1918 


1919 


1915 
1800 


1920 








BY | 


SEQ 0105 | 


NQNA 5 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 15:04:10 VAX-11 Bliss-16 V4.0-579 © 
v01.0 TEST 4 - INTERRUPT VECTOR ADDRESS TEST 21-Jun-1984 06:56:17 SPIDERSUSERS : [ BERG. DEQNA )NONAS.BLI;1 — 135 
1925 SSBTTL ‘TEST 4 - INTERRUPT VECTOR ADDRESS TEST’ 
1926 fee 
7 
1356 TEST 4: INTERRUPT VECTOR ADDRESS TEST 
1929 
DESCRIPTION: 


of the vector sddress register 
ied. The host writes date patterns 
to this ister end reeds them back verifying no static 

(stuck et 1 / —_ et 0) feults occur. If the operator specifies 


leop on error, program re-executes the code that detected the 


eH error until tC is entered. 
1959 NOTE: Only bits 9:2 of the Interrupt Vector Address Register ere 
Pon valid, rest read es 0. 
poy The following BINARY dete patterns ere used: 
1944 00000000 11111111 
1945 10101010 01010101 
1946 11001100 00110011 
11110000 00001111 
walking 1's. 1 propagating thru Vector Address Reg. 
ots walking O's, 0 propageting thru Vector Address Reg. 
1951 Hardwere tested: Device Vector Address Register 
is Slave Interface Registers 
1954 Processing: 
1955 
i BEGIN 


reset device 

REPEAT for eech pettern 
write pettern to Vector Address Register ( bits 9:2 ) 
read pattern from Vector Address Register ( bits 9:2 ) 
compere wt ‘te pattern to read pattern (less noise bits) 
IF not equal 
THEN 

Sian error message if not inhibited 


ENDREPEAT 
END 


oF OF SF GF Ge SF GF GF OF Ge GF GF Ge GF GF GF Gs GF GF GF GF Ge GS Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge Ge GP Ge Gs Ge Ge Ge Ge Gs Ge Ge Ge 
£2 
Som 
oe Oe he he be Be Oe Fe Oe he Oe he oe Fe ee be he Fe ee Be be be be be Be bt Be he be Oe ee Be be Be he ne Be ee be ee ee 
OS OD OD OS OD OD OS OS OS OS OS OS OS OS 8S 8S OS 8S 8S 6S OS 1S 6S 6S 6S 8S 8S +S 8S 8S 8S 8S 8S 8S OS 8S OS +O HO ©@ FO FO SO 


MAMMA UMARADNNNNNAOADD SUWUWWUWUWWED YIN IDAADS © a WUUWUUUUUwuw 





C9 


12-Jul-1984 13:04:10 
21-Jun-1984 06:36:17 


SEQ aa 
VAX-11 Bliss-16 V4.0-579 


DEQNA FUNCTIONAL TEST 23 
SPIDERSUSERS : [BERG . DEQNA JNQNAS. BLIs1 13) 


CNQNAAO 
TEST 4 - INTERRUPT VECTOR ADDRESS TEST 


BGNTST; 
RESET_DEQNA ( ); 


ee 


WRITE ALTERNATING 0‘S AND 1‘S TO INTERRUPT VECTOR ADDRESS REGISTER 
mm THE I/0 PAGE, THEN READ AND COMPARE TO THE WRITE PATTERN 


INCR INDEX FROM O TO 7 DO 
BEGIN 
TEMP1 = .PTRN_TABLE [ .INDEX ]}; 


PuT BIT { INT_VEC, VEC_ADR, .TEMP1 ); 
IF = _BIT { INT_VEC, VEC_ADR } NEQU .TEMP1 


SEGIN 
PRINTB ( MSGS9 ); 
PRINTB ( MSG65 ); 
PRINTB ( MSG30, .GET_ADR [ VEC_ALL ], .TEMP1, GET_BIT [{ INT_VEC, VEC_ADR )} ); 
ERRDF ( 0401, MSGOO, E1LSREPORT ); 


ENDSUB; 
END; 


WRITE WALKING 1 PATTERN INTO THE INTERRUPT VECTOR ADDRESS IN THE I/0 PAGE 
REGISTER THEN READ AND COMPARE TO THE WRITE PATTERN 


e@ *@ t@ ¢@ 
' o 


TEMP1 = #8°00000001'; 


INCR INDEX FROM O TO 7 00 
BEGIN 


i 
PuT_BIT [ INT_VEC. VEC_ADR. .TEMP1 }; 
— ( INT_VEC, VEC_ ADR } NEQU .TEMP1 


BEGIN 
PRINTB ( MSG5S9 ); 
PRINTB ( MSG65 ); 
PRINTB ( MSG30, 
ERRDF ( 0402, 


-TEMP1 * 1; 


-GET_ADR [ VEC ~~ }, .TEMP1, GET_BIT [ INT_VEC, VEC_ADR } ):; 


MSGOO, E1SREPORT ) 
END; 
TEMP1 = 
ENDSUB; 
END; 


> 
aa 


WRITE WALKING O PATTERN INTO THE INTERRUPT VECTOR ADDRESS IN THE I/O PAGE 
REGISTER THEN READ AND COMPARE TO THE WRITE PATTERN 


TEMP1 = #$8'11111110'; 


D9 


NQNA3 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10  VAX-11 Bliess-16 v4.0-579 ne 

vO1.O TEST 4 - INTERRUPT VECTOR ADDRESS TEST 21-Jun-1984 08:36:17 SPIDERSUSERS:(BERC.DEQNAJNQNAS.GLI;1 (13) 

; 2024 3 

; 2025 3 INCR INDEX FROM © TO 7 DO 

; 2026 4 BEGIN 

; 2027 6 BGNSUB ; . 

: 2028 6 PuT_BIT { INT_VEC, VEC_ADR, .\EMP1 ); 

; 2029 6 IF GET BIT ( INT_VEC, VEC_ADR ) NEQU .TEMP1 

; 2030 6 THEN 

; 2031 7 GIN 

; gose 7? PRINTB ( MSGS9 ); 

; 2033 7 PRINTB ( MSG65 ); 

> 203a 7 PRINTB ( MSG30, .GET_ADR { VEC_ALL }, .TEMP1, GET_BIT ({ INT_VEC, VEC_ADR } ); 

; 2035 7 ERRDOF ( 0403, MSGOO. ELSREPORT ); 

; 2036 6 END; 

; 2037 6 

; 2038 6 TEMP1 = (( .TEMPL t 1 ) + 1 ) AND #0'000377° ; 

; 2039 4 ENDSUB; 

; 2040 3 END; 

3 2041 3 

; 2042 1 ENDTST; 

\SBTTL $14 TEST 4 - INTERRUPT VECTOR ADDRESS TEST 

000000 004137 0000006 $174: JSR Ri, $SAVE2 ; 1922 
162706 000022 SUB 22, 

000010 064737 000000G PC, RESET .DEQNA ; 1973 

000014 CLR Ri ; INDEX 1980 

000016 116137 1s: PTRN. TABLE(R1), TEMP1 ; #C INDEX), 1982 
105037 000001G CLRB 4 —-: TEMP el 

000030 2s: TRAP 2 

000032 013700 0000006 MOV REG. ADR,RO ; 1984 

000036 013702 000000G MOV TEMP1,R2 

000042 ASL R2 

000044 ASL. R2 

000046 042702 176003 BIC €176003,R2 

000052 042760 001774 000014 BIC 01774, 14(RO) 

000060 000014 BIS R2,14(RO) 

000064 016016 000014 MOV 14(RO), (SP) ; *, TMP LOCATION 1985 

000070 013702 MOV TEMP1,R2 

000074 011600 MOV (SP),RO ; TMP.LOCATION, « 

000076 006200 ASR RO 

000100 006200 ASR RO 

000102 042760 177400 BIC 8177400,R0 

000106 CMP RO,R2 

000110 001456 BEQ 3$ 

COO0112 012746 MOV omSG59, -( SP) : 1986 

000116 012746 000001 MOV #1, -(SP) 

000 010600 MOV SP RO ; SP,e 

000124 104414 TRAP = «14 

000126 012716 0C0000G MOV oMSG6S, (SP) : 1989 

000132 012746 000001 MOV 01, -(SP) 

000136 010600 MOV SP RO ; SP,s 

000140 104414 TRAP «14 

000142 013700 0000006 MOV REG. ADR,RO : 1990 


CNQNAAO EST 

TEST 4 - INTERRUPT VECTOR ADDRESS TEST 
000014 
000010 


177400 


DEQNA FUNCTIONAL T 


000010 


000000G 
000000G 000014 


000014 
000014 


000001 


000000G 
000014 


000014 

38: 
000000G 

4$: 
000014 
000006 
000016 


PEEELEEE EI TE § 


BD 
3% 


SaSGRRAASEORGREN GREG 


EQ 


12-Jul-1984 15:04:10 
21-Jun-1964 08:36:17 


14(RO),10¢SP) 
10(SP),RO 

RO 

RO 

@177400,RO0 


R2,14 
14(RO).6( SP) 
TEMP 1, 
6(SP),RO 

RO 





SEQ Pg 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [ BERG . DEQNA JNQNA3. BLIs1. 


3; *, TMP LOCATION 
3; TMP .LOCATION,« 


; *, TMP .LOCATION 
3; THP.LOCATION,« 


s SP,¢ 


, INDEX 


s *. TMP .LOCATION 
TMP .LOCATION, « 


: SP, 


: SP, 


¢, TMP LOCATION 


25 
om 13) 


2011 


000016 


000016 
000000G 


000000G 
000001 


000000G 
000014 


000024 


CNQGNAAO DEQNA FUNCTIONAL TEST 
TEST 4 - INTERRUPT VECTOR ADDRESS TEST 


000024 


5$: 


6%: 


MOV 
ASR 
ASR 
BIC 


gpg ceteaezee 


BESSaRRaneaaseaRRe ashe 


rg 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


16(SP),RO 
RO 


RO 
#177400,RO0 





SEG 0109 


VAX-11 Blies-16 V4.0-579 


be 
SPIDERSUSERS : (BERG. DEQNA JNQNAS .BLI;1 


5 TMP -LOCATION, * 


; *, TMP .LOCATION 
3 *,14P.LOCATION 
3 TMP .LOCATION, « 


; SP, 


oe ee ee oF 
. 
“ 
»< 


«, TMP .LOCATION 
TMP .LOCATION, « 


; SP, 


; SP .¢ 


e, TMP LOCATION 
TMP .LOCATION, 


age 26 
(13) 


2032 
20335 


2034 


; Routine Size: 
; Maximum steck depth per invocation: 


000000 
000000 
000004 
000006 
000010 
000012 


: Routine Size: 
; Maximum steck depth per invocation: 


004737 
104466 
006000 


103773 
000207 


3 20435 1 


DEQNA FUNCTIONAL TEST 


CNGNAAO 
TEST 4 - INTERRUPT VECTOR ADDRESS TEST 


177400 


000022 


269 words, 


002114’ 


6 words, 


7$: 


Rout ine _— 


T4:: 
1%: 


ges 


BRRESSSCRRSE 


D 
~4 
w 


G9 


SEG Aang 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : (BERG. DEQNA JNQNAS. eLIs1. 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


RO 

RO 

#177400,R0 

RO,(SP) 

GET.ADR ; *,T4P.LOCATION 
@14,30(SP) 3 ¢ Da ht 
SP ,RO ; SP, 

ss ; 


T4 TEST 4 - INTERRUPT VECTOR ADDRESS TEST 
PC, $T4 3 

66 

RO 


i$ 
PC 


Routine eo ABSCODE$ + 3146 
2 words 


27 
o9* 13) 


2035 


2031 
2038 


1922 


oe Fe te Be be bt te Bee be ee be fe ee Pe fe ee Be Pe be fe Pee Be fee bt be bat ee be ee ee ee Be Be ee be ee fee bee be pe Be be ee he ee 


H9 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 


@SBTTL ‘TEST 5S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST’ 


See 
TEST 5S: BOOT/DIAGNOSTIC PROM CHECKSUM TEST 


DESCRIPTION: 


This test verifies that the contents of the on-board ROM 
(Boot/Diagnostic ROM) can be loaded to the host memory correctly. 
Checksum is generated from the ROM date read and this checksum is 
compared to the checksum stored in the last word location of the 
on-board ROM. If the operator specifies loop on error, the program 
re-executes the code that detected the error until tC is entered. 


Q-Bus to DMA interface 
18051 — 


Hardwere tested: 


CSR regist 
ister 
Renciek FIFO 
Processing: 
BEGIN 


° 
5S in CSR ) = 0 


wait 10 msec. or until RL C b 
check CSR status ( bit 5 ) and RCV Descriptor List stetus 
ene 


print error message if not inhibited 
NDIF 


E 
clear Boot/Diagnostic ROM bit in CSR 
This moves contents of FIFO to host memory 

weit 10 msec. or until RCV Descriptor status changed 
IF change in stetus 
par int if t inhibited 

print error message if not inhibi 
NDIF 


compute ROM checksum and compare to checksum read from ROM 
c-_ equal 


print error message if not inhibited 
— 


. 
: 
: 


12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 
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SEQ O111 
Page 28 
(14) 


19 


s€0.011 
CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10  VAX-11 Bliss-16 v4.0-579 a 
v01.0 Fes] 5 - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 21-Jun-1984 08:36:17 | SPIDERSUSERS; (BERG. DEQNAJNONAS.8LI;1. "(15 


BGNTST; 


RESET_DEQNA ( ); 
CLR_BUFFERS ( 26K )s 


¢ 


° S 
w 


COPY BOOT/DIAGNOSTIC PROM DESCRIPTOR LIST INTO WORK AREA 


INCR INDEX FROM O TO BD_0.SIZE - 1 DO 
DESCR_LIST [ .INDEX, W_LEN ) = .BD_PROM_DESCR [ .INDEX }; 


.IOP_TABLE [ RLO_ADR } = tr O_LIST; 
.IOP_TABLE [ RHI_ADR } = 


PuT_BIT ( CSR, LB, EXT_LOOPBACK ); 
PuT_BIT ¢ CSR, BD. SET_IT ); 


DELAY (€ K ); 
INCR INDEX FROM O TO TIMES_LIMIT DO 
IF GET_BIT { CSR, RL ) EQLU ZERO 
THEN 
BEGIN 
TEMP1 = . INDEX; 
EXITLOOP; 
END 
ELSE 
IF . INDEX EQLU TIMES_LIMIT 
THEN 


); 
PRINTS ( MSG66, GET_BIT [ CSR_ALL ]} ); 
ERRDF ( 0501, MSGOO, ERRORSREPORT ); 


CSR, BD, CLR_IT ); 


a 
YC K ); 


: 
: CHECK IF RECEIVE STATUS CHANGED 


VER _DESCR_STATUS ( ); 
RESET _DEQNA ( ); 
TEMPS = O; 


oe G2 Ge Ge GF Ge Ge Ge GF Ge GF Ge Gs Ge GF Ge Ge GF Ge SF GF Gs GF GF GF GF GF GF SF Gs GF Gs GF Ge Gt GF GF Ge Ge Gs Ge OF GF Ge Ge oF GF SS Gs Ge OF OF os 
8) 
~ 
~ 
~ 
WWMM WUUWUUWUUWW &baWWW hed SWUWUWWW UUW UUW WW Ut 


NQNAS 

v0O1.0 

: 2144 3 

3 2145 53 

: 2146 3 

: 2147 3 

; 21486 3 

: 2149 3 

: 2150 53 

3 213i 5 

3 2152 53 

’ 2153 5 

$ 2154 3 

: 2155 53 

: 2156 3 

8 2157 3 

3 2158 3 

3 2159 3 

$ 2160 4 

8 2161 4 

3 2162 4 

8 2163 53 

8 2164 5 

3 2165 4 

3 2166 3 

; 2167 4 

3 2168 4 

8 2169 4 

3 2170 4 

$ 2171 4 

8 2172 3 

$ 2173 3 

8 2174 i 
000000 004137 
000004 162706 
000010 004737 
000014 012746 
000020 004737 
000024 005000 
000026 016060 
000034 062700 
000040 7 
000044 003770 
000046 012777 
000054 005077 
000060 013700 
000064 052760 
000072 012701 
000076 001411 
000100 013700 
000104 001404 


JI 


CNQNAAO DEQGNA FUNCTIONAL TEST 12-Jul-1 
TEST 5 - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 21-Jun-1 


TEMPS = .DATA_BUFFER [ CHSUM_OFFSET + 1 J; 
TEMPS = ( .TEMP3 * 8 ) AND SX‘FFOO'; 
TEMPS = .DATA_BUFFER [ CHSUM_OFFSET ] + .TEMPS; 


TEMP2 = .DATA_ pres { .TEMPS + 1 J); 
TEMP2 = ( .TEMP2 t 8 ) AND SX’‘FFOO'; 
TEMP2 = .DATA_BUFFER [ .TEMP3 ) + .TEMP2; 


COUNTER = O; 
CHECKSUM = 0; 


INCR INDEX FROM O TO PROM_SIZE - 2 DO 
IF .COUNTER EQLU .TEMPS 


THEN 
COUNTER = .COUNTER + 2 
ELSE 


BEGIN 
CHECKSUM = .CHECKSUM + ( .DATA FER ( . ‘FF: 
= GOUNTER / a _BUFFER [{ .COUNTER ] AND @xX‘FF’ ); 
e 


IF he — EQLU ZERO ) OR ( .TEMP2 NEQU .CHECKSUM ) 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
aes c + fg . TEMPS TEMP 
co © w ° 2. . CHECKSUM 
ERROF ( 0502, MSGOO, E1SREPORT); " 


END; 

ENDTST; 

-SBTTL $T5S TEST 5S - BOOT/DIAGNOSTIC PROM 

$75: JSR R1,$SAVES - 3 — 

000010 SuB @10,SP 
000000G JSR PC,.RESET.DEQNA 3 
004000 MOV ~~ (SP) : 
000000G JSR PC,.CLR. BUFFERS 

CLR RO ; INDEX 
000000G 000000G 1%: MOV BD .PROM.DESCR(RO).DESCR. LISTCRO); *( INDEX), «C INDEX) 
000002 AOD 62,R0 3; *, INDEX 
000036 a4 RO, 036 : INDEX, + 
000000G 000004G MOV ORCV.O.LIST,@IOP. TABLE +4 
000006G CLR @IOP . TABLE +6 
000000G MOV REG .ADR,RO ; 
001410 000016 BIS #1410,16(RO) : 
002000 -_ on > gn 3; *, $$ TMP2 
000000G oo ait RO ; #,$$TMPl] 
000010 3$: CLR 10(SP) ; $$TMP 


:10 VAX-11 Bliss-i6 V4.0-579 
:17 SPIDERSUSERS:; { BERG. DEQNA JNONAS.@LI;1 "(159 


SEQ 0113 


LT 


KY 


12-Jul-1984 15: 


NQNAS CNQNAAO DEQNA FUNCTIONAL TEST 

v01.0 TEST 5S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 21-Jun-1984 

000112 005300 DEC RO 

000114 0013574 BNE 3$ 

000116 005301 43: DEC R1 

000120 000766 BR 2s 

000122 005001 S$: CLR R 

000124 013700 000000G 6$: MOV REG. ADR ,RO 

000130 Ol 000016 000002 MOV 16(RO),2CSP) 

000136 032766 000040 BIT #40,2(SP) 

000144 0010035 BNE 7 

000146 010137 000000G MOV Ri, TEMP1 

000152 000440 BR 

000154 920127 002000 7$: CMP R1,#2000 

000160 001031 BNE 

000162 012716 000000G MOV @MsSGS9, (SP) 

1 012746 000001 MOV #1, -CSP 

000172 010600 MOV SP, 

000174 104414 TRAP ia 

000176 013700 000000G MOV REG. ADR,RO 
016066 000016 000006 MOV 16(RO),6CSP) 

000210 016616 000006 MOV 6(SP).(SP) 

000214 012746 000000G MOV OMSG66. - (SP) 

000220 012746 000002 MOV @2,-CSP) 

000224 010600 MOV SP,RO 

000226 104414 TRAP 14 

000230 104455 TRAP SS 

000232 000765 -WORD 765 

000234 000000G -WORD MSGOO 

000236 000000G -WORD ERRORSREPORT 

000240 062706 000006 ADD . 

000244 8$: INC 

000246 020127 002000 CMP R1, 82000 

000252 003724 BLE 6$ 

000254 004737 900000G 9$: JSR PC, VER.DESCR. STATUS 

000260 013700 900000G MOV REG. ADR RO 

000264 142760 000010 000016 BICB #10,16(RO) 

000272 012701 002000 MOV #2000, 

000276 001411 10%: BEG 

000300 013700 000000G MOV LSOLY,RO 

000304 001404 BEQ 12% 

060306 005066 000010 11$: CLR 10( SP ) 

000312 005300 DEC RO 

000314 001374 BNE 11% 

000316 005301 123: DEC R1 

000320 000766 | 10% 

000322 004737 000000G 13%: JSR PC, VER.DESCR. STATUS 

000326 004737 000000G JSR PC ,RESET .DEQNA 

000332 005037 000000G TEMPS 

000336 113737 000007G 000000G MOVB DATA.BUFFER+7, TEMPS 

000344 013700 000000G MOV TEMPS ,RO 

000350 000 SWAB RO 

000352 i ! CLRB RO 

000354 010037 00000OG MOV RO, TEMPS 

000360 042737 000377 000000C BIC 0377, TEMPS 


SEQ 0114 


VAX-11 Bliss-16 V4.0-579 


P 
SPIDERSUSERS : [BERG .DEQNA JNQNAS .8LI;1 


$$TMP1 
$$TMP2 
INDEX 


¢, TMP .LOCATION 
+, TMP .LOCATION 


INDEX, « 
INDEX , + 


SP, * 


¢, TMP .LOCATION 
TMP .LOCATION, « 


SP,+¢ 


INDEX 
INDEX, + 


*,$$TMP2 
o, $$\/MPL 


$$ TMP 
$$TMP1 


$sTMP2 


ege 351 
(15) 


2110 
2111 


2114 
2113 
2118 


2i21 


2122 


2123 


2120 
2110 


2126 
2132 
2133 


2139 
2141 
2144 


2145 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 


005302 

001357 

013700 000000G 
001403 

020037 000000G 
001440 

013700 000000G 
016066 000016 000006 
016637 000006 000000G 
012716 

012746 000001 

010600 

104414 


148: 


15$: 


16%: 


178%: 


18%: 


OBaees 


@ 
~ 
% 







EEEEEPEEEEEE EE BEL EEE 


.- = & xf ng 
SS DD 
333° 


D 
_~ 
w 


LY 


RO 
DATA.BUFFER+6,RO 
RO, TEMPS 


TEMPS ,R1 
——e ee 


RO, TEMP2 
ee 
DATA.BUFFERCR1),RO 
RO, TEMP2 





12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG .DEQNA JNQNAS .BLI;1 


*, INDEX 


INDEX 


¢, TMP .LOCATION 
TMP .LOCATION, « 


SP .¢ 


SEQ 0115 


32 
(15) 
2146 


‘eee 


NQNAS CNQNAAO DEQNA FUNCTIONAL TEST 
v01.0 TEST 5S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 
; Routine Size: 215 words, Routine Base: ABSCODES + 3162 


; Maximum stack depth per invocation: 16 wo 


000000 004737 003162’ TS:: 
000000 1$: 
000004 104466 

000006 006000 

000010 103773 

000012 000207 


; Routine Size: 6 words, Routine Base: 


; Maximum stack depth per invocation: 2 words 


3 2175 1 


M9 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


SEQ 0116 


VAX-11 Bliss-16 V4.0-579 


p 
SPIDER SUSERS : (BERG. DEQNA JNQNAS.BLI;1 


-SBTTL TS TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST 


PC,$T5 
66 


ABSCODE$ + 4034 


ege 55 
(15) 


2172 


ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee pe ee ee ee pe 


N9 


SEQ Kt 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 
TEST 6 - INTERRUPT SANITY TEST 21-Jun-1984 08:56:17 SPIDER $USERS : [BERG . DEQNA JNQNAS. BLI;1. 


SSBTTL ‘TEST 6 - INTERRUPT SANITY TEST’ 


See 
TEST 6: INTERRUPT SANITY TEST 


DESCRIPTION: 


This test verifies that DEQNA interrupts the processor only at 
the expected level ( 4 ) and not any other level. If the operator 
specifies loop on error, the program re-executes the code that 
detected the error until tC is entered. 


Hardware tested: Q@-Bus to QTDC interface 
CSR register 

Q-Bus timeout logic 
QTOC interrupt logic 


set-up for NXM interrupt 

REPEAT for each processor priority level 
enable device interrupt (set CSR bit 6) 
force NXM interrupt 

check for expected CSR status 

IF error 

THEN 


oo error message if not inhibited 


ENDREPEAT 
END 


: 


34 
0 16) 


< 

=¢ 

~ 
ae 


HWE BAD NINN APRDADAD YUIIPAAAPAASAPAARSAOPCOHSCOO Ss Qwuwwuuwe vue 








B10 


12-Jul-1984 13:04:10 
21-Jun-1984 06:36:17 


SEQ 0118 
VAX-11 eee te ¥4.0-579 "hens ~ 
SPIDERSUSERS : [BERG . DEQNA JNQNAS .BLI;1 





CNQNAAO SEGNA FUNCTION® TEST 
TEST 6 - INTERRUPT SANTTY TEST 


* SET UP FOR AN NXM INTERRUPT 





INCR PRIORITY FROM PRIOO TO PRIO7 BY 80°40" DOD 
SETAE ( PRIORITY ); 

PUT BIT ( ( a IE, SET_IT ); 

INTERRUPT . FLG * CLEAR _FLG; 


XLO_ADR }] = NXM_LO_ADR; 
XHI_ADR ] = NXM_HI_ADR; 


! SET PROCESSOR PRI LEVEL 
: ENABLE INTERRUPTS 








ITE LOW ADDRESS 


. 10P_TABLE ! WR 
! WRITE HIGH ADDRESS 


10P~ ~ TABLE 
DELAY ( 2 ); 

GETPRI ( TEMP1 ); 

TEMP1 = .TEMP1 + ( - 5S ); 

IF .INTERRUPT_FLG EQGLU WORD_LIMIT 


IF .PRIORITY GTRU PRIOS 
THEN 












! INTERRUPT SHOULD NOT OCCUR 





BEGIN 
PRINTB ( MSGS59 ); 

ERRDF ( 0601, MSGOO, E1SREPORT ); 
. 





IF .INTERRUPT_FLG EQLU ZERO 
IF .PRIORITY LEQU PRIOS 
THEN 
BEGIN 


! INTERRUPT SHOULD OCCUR 





PRINTB € MSGS9 ); 
ERRDF ( 0602, MSGOO, E1SREPORT ); 





END; 
RESET _DEQNA ( ); 


ENDSUB; 
COUNTER = .COUNTER «+ 1; 
END; 


SETPRI € PRIOS ); 
ENDTST; 


! SET PROCESSOR PRI LEVEL 


$5 
7) 





a 


ee 


012716 


CNQNAAO 
TEST 6 - INTERRUPT SANITY TEST 


000000G 
177773 
000000G 


DEGNA FUNCTIONAL TEST 


$T6: 


10%: 


000000G 
000000G 177777 


000000G 
000000G 


TST 


C10 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


.SBTTL $76 TEST 6 - INTERRUPT SANITY TEST 
JSR . $SAVE2 ; 


HWP. TABLE ,RO 
2(RO), @IOP. TABLE+14 


REG. ADR ,RO 


PC 
INTERRUPT .FLG,@-1 


11$ 

R2, @PRIOS 
11% 

OMSGS9, (SP) 





VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG .DEQNA JNQNAS.BLI;1 


¢, PRIORITY 
PRIORITY ,¢ 


#,$$TMP2 
*,$$TMPl 


$$ TMP 
$$TMP1 


$sTMP2 


oe, $$TMP2 
oe, $$TMPl 


$$TMP 
$sTMP1 


$sTMP2 


TEMP1,«¢ 


PRIORITY,¢ 


_ 


SEQ 0119 
Pege 36 
(17) 
2174 


2211 
2212 


2229 
2230 


2232 
2234 
2237 


Routine Size: 


012746 
010600 


CNQNAAO 
TEST 6 - INTERRUPT SANITY TEST 


000001 


000012 
000000G 


000012 


159 words, 


DEQNA FUNCTIONAL TEST 


11$: 


128: 


136: 


Routine Base: 


; Maximum steck depth per invocation: 16 


QBRER GbR gg ggEEEEDGzERE 


B33 


D10 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


ABSCODE$ + 4050 





VAX-11 Bliss-16 V4.0-579 


SPIDERSUSERS : (BERG. DEQNA JNOQNAS.BLI;1 


; SP,« 


; PRIORITY,« 


3; SP, 


: 
3; @,PRIORITY 
; PRIORITY,« 


SEQ 0120 
Pege 37 
(17) 


2238 


2174 





E10 


NQNAS CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 _ Bay 38 

v01.0 TEST 6 - INTERRUPT SANITY TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG. DEQNA JNQNAS. BLI;1, om 17) 
.SBTTL T6 TEST 6 - INTERRUPT SANITY TEST 

000000 004737 004050’ T6:: 

000000 1$: JSR PC,$T6 ; 2256 

000004 104466 TRAP 66 

000006 006000 ROR RO 

000010 103775 BLO 1$ 

0000:2 000207 RTS PC 

; Routine Size: 6 words, Routine Base: ABSCODES + 4546 

; Maximum stack depth per invocation: 2 words 


3 2259 1 


vo1.0 


oF GF GF GF Gr GH GF GF GF GF GF GF GF GF BF GH Ge GF GF GF GF GF GF GH Ge OF OF OF OF GF GF OF OF OF Gs OF er GF OF OF OF os Os OF Os Os Os Os oe 


Pe he he hee te hee fee fee Bet fe ee ft be be Pee et at fee fe ft fe a ae be bee pe Be Pee fee fee fe ae ee ee ee ee ee ee fee fe ee pe be ee be be ee 


F10 


SEQ 0122 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 
TEST 7 - ETHERNET CARRIER SENSE TEST 21-Jun-1984 08:36:17 SPIDER SUSERS : (BERG. DEQNA JNQNA3S .BLI;1 


SSBTTL ‘TEST 7 - ETHERNET CARRIER SENSE TEST’ 


See 
TEST 7: ETHERNET CARRIER SENSE TEST 


DESCRIPTION: 


This test verifies that the DEQNA cen transmit external loopback 
packets ard if not faulty FRU is can be found by executing this 
by iaplcementing the instructions printed on the operator's console. 


In order to run this test successfully the operator has to make 

sure that DEGNA is connected to the transceiver. If the operator 
specifies loop on error, the progrem re-executes the code that detected 
the error until tC is entered. 


Herdware tested: Cerrier Sense circuitry 
Encode/Decode ( ED ) chip 
Processing: 
BEGIN 


o error message if not inhibited 


read CSR 
ee Sereior Cvve Hee 6 Hes i3)-=1 
oe error message if not inhibited 
transmit t uncheined loopbeck pecket ( ETHERNET format ) 
read CSR while transmitting loopbeck packet 
— Cerrier Sense bit (bit 13) = 0 
int error message if not inhibited 

weit until Carrer Sense bit goes to 0 

ENDIF 


read CSR 
oe Cerrier Sense b:t (bit 13) = 1 


oo error message if not inhibited 
END 


Pege 39 
(18) 


ViVIVUVIS SHaSaADADH HSH HALAL AA&\L HAUUVUVUYUGAAGAARHVUAAADAHVNYUYUYUYU SUS PBwuwww 


G10 


SEQ 0123 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 Page 
TEST 7 - ETHERNET CARRIER SENSE TEST 21-Jun-1984 08:36:17  SPIDERSUSERS:(BERG.DEQNAJNONA3.BLI; 1 
BGNTST; 
IF .SWP_ILOOP 
THEN 
BEGIN 
RESET_DEQNA ( ); 
IF (ROT GeT.eit ( CSR. XC) > AND ¢ .SWP_LBC EQLU ZERO ) 


BEGIN 
. Stine FF 


SELECTONE .XC_FL 
SET 






{ 0): 
HE FLAG * .XC_FLAG 1 
° * 
PRINTS ( MSGS9 ); 
PRINTS ¢ MSG47 ); 
ERRDF ( 0704, MSGOO, ERRORSREPORT ); 
END; 
{1}: 
oer FLAG ZERO 
x : 
PRINTB ( MSGS9 ); 
PRINTS ( MSG42 ); 
-—" € 0705, MSGOO, ERRORSREPORT ); 
: 
TES; 
EXIT_TST; 
END 
ELSE 


XC_FLAG = ZERO; 


¢ 
RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING 
TESTS IN EXTERNAL LOOPBACK MODE. 


RESET_DEQNA ( ); 
PREP_FOR_SETUP ( ); 
INCR INDEX1 FROM 1 TO 14 00 
WRT _STATION_ADR ( .INDEX1, PHA_INDEX ); 


BGNSUB; 
XMIT_SETUP_PACKET ( N_MODE ); 
$ 


ERR_FLAG = ZERO; 
INCR INDEX2 FROM O TO 19 DO 


BEGIN 
SEND_TEST_PACKET ( ); 
DELAY ( 100 ); 
CSR_WORD = GET -BIT (€ CSR_ALL ); 
IF € .CSR_WORD AND #0'100220' ) EQLU #0'100220' 


40 
(19) 


PAP DHADADADAAUDAHAAADMUAAAAAHMNUAAHHAHHVUAGHHAHHOVUUU S dd a&UYVIRDOOU 


DEQNA FUNCTIONAL TEST 


TEST 7 - ETHERNET CARRIER SENSE TEST 


THEN 


BEGIN 
ERR_FLAG = ZERO; 
EXITLOOP; 
ELSE 
ERR_FLAG = ONE; 
END; 


IF .ERR_FLAG 
THEN 


BEGIN 
— -ERR_COUNT OF 


PRINTB ( 
ERRDF ( 0708, MSGOO, 
END; 
{31}: 
BEGIN 
ERR_ T = O; 


H10 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


ERRORSREPORT ); 


ERRORSREPORT ); 


ERRORSREPORT ); 


ERRORSREPORT ); 


SEQ a 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [ BERG .DEQNA JNQNA3. BLI:1 


ay 
om 619) 


NNN NNN YY NYA PSH HSHASUUUMUAAAARARVUUARM®ARNVYVAAAAAHYUYUYVA2AA OU 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 7 - ETHERNET CARRIER SENSE TEST 


EXIT_TST; 
END 


I10 


12-Jul-1984 15:04:10 
21-Jun-1984 08:36:17 


ELSE 
IF .ERR_COUNT GTRU ZERO 
THEN 


XC_FLAG 


BEGIN 


CSR_WORD = GET_BIT ( CSR_ALL ); 
SELECTONE . .ERR_COUNT OF 


[ 2.3 }: 


TES; 
EXIT_TST; 
° 


= ZERO; 


ERR_COUNT = ZERO; 


TEMPS = 


PRINTB 
PRINTS ( MSG44 ); 


BEGIN . 

5 = 0; 
PRINTB ( MSGS9 ); 
PRINTB ( MSG46 ); 


. 


BGNSUB ; 
~— INDEX2 FROM O TO TIME1_LIMIT DO 


GIN 
RESET_DEQNA ( ); 
. INDEX2; 


SEND_TEST_PACKET ( ); 
INCR INDEX FROM O TO TIME1_LIMIT DO 


SEQ io 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG . DEQNA JNQNA3. BLI;1. 


"CHECK ETHERNET CARRIER SENSE BIT ( CA - BIT 13 ) IN THE CSR. CA SHOULD BE 
SET TO '1' WHILE THE DEQNA IS TRANSMITTING. IF CA ISN'T SET TO ‘1’ WITHIN 
THE EXPECTED TIME LIMIT, ERROR MESSAGE IS PRINTED OUT. 


42 
°F 19) 


AAD 1A NSN NNN NNO OO 4 OOOO NINN SISO OOO 4 OOOO ~~ 


CNQNAAO 04 
TEST 7 - ETHERNET CARRIER SENSE TEST 21-Jun-1984 08:36:1 


J10 


DEQNA FUNCTIONAL TEST 12-Jul-1984 13: 


SEG 0126 
:10 VAX-11 Bliss-16 V4.0-579 Page 43 
217 SPIDERSUSERS : [BERG .DEQNA JNQNA3.BLI;1 (19) 


IF GET_BIT [ CSR, CA } EQGLU ONE 
THEN 


BEGIN 
TEMP2 = GET_BIT [{ CSR_ALL }; 
. _ 


ELSE 
IF .INDEX EQLU TIME1_LIMIT 
THEN 


BEGIN 
PRINTB (€ MSGS5S9 ); 
PRINTB ( MSG19, GET_BIT [{ CSR_ALL ]} ); 
— ( 0701, MSGOO, ERRORSREPORT ); 
: 


“NOW CHECK IF THE CA BIT RESETS TO ‘0’ WHEN THE DEQNA COMPLETES TRANSMITTING 
LOOPBACK PACKET. PRINT ERROR MESSAGE IF LOOPBACK PACKET TRANSMISSION 
EXCEEDS SELECTED TIME LIMIT. 


om ¢@ t@ +@ +@ 
' > 


INCR INDEX FROM O TO TIME2_LIMIT DO 
—- { CSR, CA } EQ@LU ZERO 


BEGIN 
TEMP3 = GET_BIT [ CSR_ALL ]}; 
EXITLOOP; 

END 

ELSE 

IF .INDEX EQLU TIME2_LIMIT 

THEN 
BEGIN 
PRINTB ( MSGS9 


) 
PRINTB ( MSG20. GET_BIT [ CSR_ALL } ); 
ERROF (0702, MSGOO; ERRORSREPORT ), 


4g 
$ " CHECK RECEIVE INTERRUPT REQUEST Rae . RI - BIT 15 ) TO VERIFY THAT DEQNA 
: _ACTUALLY TRANSMITTED LOOPBACK PACKE 

'. 


DELAY (€ 5O ); 
IF GET_BIT ({ CSR, RI ] EQLU ONE 
THEN 
BEGIN 
TEMP4 = GET_BIT [( CSR_ALL ]; 
EXITLOOP; 
END; 
END; 


IF . TEMPS EQLU TIME1_LIMIT 


< 
2§ 
oe 
ow 


¥ 
oO 


FARADAY NVSNAOADAAABDAARDRAAAS sss wuss 


K10 


12-Jul-1984 13:04:10 


DEQNA FUNCTIONAL TEST 
21-Jun-1984 08:36:17 


CNQNAAO 
TEST 7 - ETHERNET CARRIER SENSE TEST 
THEN 


BEGIN 
PRINTB ( MSGS9 ); 
PRINTB ( MSG21, GET_BIT [ CSR_ALL } yr 
-— ( 0703, MSGOO, ERRORSREPORT ) 
; 


VAX-11 Bliss-16 V4.0-579 


SEQ 0127 


Pege 44 
SPIDERSUSERS : (BERG. DEQNA JNQNAS.BLI;1 (19) 


Ff aa { ERRSU ) EQLU 1 ) AND ( .XMIT_D_LIST ({ ABORT ] EQLU 1 ) 


BEGIN 
PRINTB ( MSGS9 ); 
PRINTB (€ MSG71 ); 
ERRDF ( 0714, MSGOO, ERRORSREPORT ); 


END; 
ae 
* COMPARE STATUS REGISTERS TO EXPECTED VALUES 


CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK pa 100220 
mart Ot _CIST { STWO1 ) = .XMIT_O_LIST [ stwo1. } AND 


T_STATUS ( XFLG _STATUS, XWD11_ STATUS )s 0‘ 140000’ , 


CHK-RCV_STATUS ( RFLG_STATUS, RWD1_STATUS ); 
IF .XMIT_D_LIST ( TOR } EQLU ZERO 
THEN 


«, TMP .LOCATION 
«, TMP .LOCATION 


¢, TMP .LOCATION 
TMP .LOCATION, 


BEGIN 
PRINTB ( MSGS9 ); 
PRINTS ( MSGSS ); 
ERRDF ( 0715, MSGOO, ERRORSREPORT ); 
END; 
ENDSUB; 
3 
ENDTST; 

.SBTTL $T7 TEST 7 - ETHERNET CARRIER SENSE TEST 
000000G $17; JSR R1, $SAVE2 $ 
000034 Su8 034 ,SP 
000001 000000G = ae ee ; 
000000G JSR PC .RESET .DEQNA 3 
000000G MOV REG.ADR, 8 
006016 MOV 16(RO), (SP) 3 
030000 BIT #10000, (SP) 3 

BNE S$ 
000000G TST SwWP .LBC 

BNE 53 
000002 MOV (SP),2¢CSP) : 
000000G MOV (SP),CSR.WORD : 
000000G MOV xc. FLAG, RO : 


OEQNA FUNCTIONAL TEST 


CNQNAAOQ 
TEST 7 - ETHERNET CARRIER SENSE TEST 


000000G 
000000G 
000001 


000000G 
000001 


1$: 


2s: 
3$: 
4$: 
5%: 


6%: 


7$: 


TRAP 


mea eeeeeeeesgegERgEecegee eons SESS 


~ 
®D 
> 


ae Pore 


L10 


12-Jul-1984 15:04:10 
21-Jun-1984 06:36:17 


o23, -(SP) 
PC..WRT. STATION. ADR 
cr 


R1,@16 

6% 

200, -( SP) 
67 i 

RO 

7$ 

ERR .FLAG 
#24 ,R2 


SEQ 0128 

VAX-11 Bliss-16 V4.0-579 Page 45 
SPIDERSUSERS : [BERG .DEGNA JNQNA3.BLI;1 (19) 
; 2321 
$ 2323 
$ 2324 
4 SP ,« 
; 2325 
H SP ,* 
$ 2326 
5 2322 
3 2328 
: 2330 
$ 2331 
H SP ,* 
F 2332 
3 SP ,« 
$ 2333 
; 2329 
3 2335 
: 2317 
; 2 
: 2346 
o3a8 

*, INDEX1 
: INDEX1,# 2349 
; INDEX1 2348 
; INDEX1,« 
; 2349 
; 2352 
; 2349 
; 2352 
; 2355 
; *, INDEX2 2356 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 7 - ETHERNET CARRIER SENSE TEST 


000000G 
000144 
000000G 


000032 


8$: 
9$: 


10$: 


11%: 
12s: 


13$: 


14$: 


15%: 


16$: 


gS885R9% 5 §g220 9088 G20 


M10 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


PC, SEND. TEST .PACKET 


VAX-11 Bliss-16 V4.0-579 P 
SPIDER SUSERS : (BERG. DEQNA JNQNAS .BLI;1 


$ 
s *,$$TMP2 
*, $$TMP1 


$$THP 
$$TMP1 


$$TMP2 


+, TMP .LOCATION 
TMP .LOCATION, « 
CSR 


INDE X2 


SEQ 0129 
age 46 
(19) 


2358 
2359 


2381 


2382 


2377 
2384 


2386 
2387 


012716 
012746 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 7 - ETHERNET CARRIER SENSE TEST 


000000G 


000001 


000000G 


090001 


N10 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


@MSG37 , CSP) 
#1, -(SP) 
SP,RO 


14 

@MSG38 CSP) 
#1, -(SP) 
SP,RO 


MSGOO 
ERROR SREPORT 
21% 


R1, 04 
22$ 
ERR. COUNT 


SEQ —— 

VAX-11 Bliss-16 V4.0-579 Page 47 
SPIDERSUSERS : [BERG . DEQGNA JNQNAS.BLI;1 (19) 
; 2388 
. SP ,* 

; 2389 
: SP ,* 

; 2390 
H 2385 
; 2392 
; 2394 
; 2395 
: SP ,* 

; 2396 
3 SP ,# 

; 2397 
; SP,«# 

; 2398 
; 2393 
; 2374 
; 

; 2402 
: 2403 
ry SP ,* 

; 2404 
; SP ,* 

; 2405 
; 2401 
; 2407 
; 2409 





Bil 
SEO 2151 
Ngee 8 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Blies-16 v4.0-579 Fage 
vo1.0 TEST 7 - ETHERNET CARRIER SENSE TEST 21-Jun-1964 08:36:17 SPIDERSUSERS : [BERG .DEQNA )NONAS.GLI;1 (19) 
"Ov : 2410 
MOV 
Ov 3; SP,e 
TRAP 
MOV 3 2411 
MOV 
MOV 3: SP, 
TRAP 
TRAP 3 2412 
. WORD 
. WORD 
. WORD 
21%: ADD 3 2406 
22%: TRAP 3 2414 
BR 3 2373 
23%: TST 3 2418 
BEG 
MOV : 2421 
MOV ; @, TMP .LOCATION 
MOV 3; TMP .LOCATION,« 
CMP 3 2424 
BNE 
MOV : 2426 
MOV : 2427 
MOV 
MOV 3; SP,«e 
TRAP 
MOV : 2426 
MOV 
MOV 3 SP, 
TRAP 
MOV ; 2429 
MOV 
MOV : SP ,¢ 
TRAP 
TRAP ; 2430 
. WORD 
. WORD 
001200 . WORD 
001202 062706 000010 ADD 3 2425 
00 000460 BR : 2422 
001210 O20127 900002 24%: x4 $ 24 
001216 020127 000003 CMP 
001222 0030235 BGT . 
001224 005037 000000G CLR ; 24454 
0012380 012746 MOV : 2435 
12 012746 000001 MOV 
1240 Ol MOV 3s SP,« 
001242 1 4 TRAP 406 
001244 012716 MOV 3 2 
001250 012746 000001 MOV 
001254 Ol MOV 3s SP, 





DEGNA FUNCTIONAL TEST 


CNQNAAO 
TEST 7 - ETHERNET CARRIER SENSE TEST 


000000G 
000016 000010 
020000 


000010 000012 
2 000000G 


000000G 
000016 000020 


33%: 


EEELELEELEL ERLE GLL a cis aa ett eer a Tt 


TRAP 





Cii 


12-Jul-1984 15:04:10 
21-4m-1984 06:36:17 


R2 

PC ,RESET.DEQNA 

R2, TEMPS 
a 
REG. ADR ,RO 
16(RO), 10( SP) 
#20000, 10( SP ) 

33% 

10(SP),12¢SP) 
12(SP), TEMP2 
35% 

Sag 
omSGS9, -(SP) 
ol. -CSP) 


14 

REG.ADR RO 

16(RO),20( SP) 
SP) 


VAX-11 Blies-16 V4.0-579 4 a9 
SPIDERSUSERS : [BERG .DEQNA JNONAS.BLI;1 (19) 
3 2437 
3 2433 
: 2439 
" 2441 
2442 
. SP, 
3 2443 
3; SP,« 
3 C444 
; 2440 
3 2446 
: 2420 
; 2450 
; 2451 
; INDEX2 2454 
3 2456 
; INDEX2,¢ 2457 
; 2465 
; INDEX 2467 
; 2468 
3 ¢, TMP .LOCATION 
; *,TMP.LOCATION 
3; *,TMP.LOCATION 2471 
; 2470 
; INDEX,« 2475 
, 2478 
e SP,¢ 

2479 


5 
; *,TMP.LOCATION 


; SP,« 
, 2480 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 7 - ETHERNET CARRIER SENSE TEST 


000000G 
000016 000026 


000032 


000000G 
000016 000024 


34%: 


35%: 
36%: 


37$: 


g888855 g222RIPSEREIOE Tat 


ee bb piste LE Lt ft 


Dili 


12-Jul-1984 13:04:10 
21-Jun-1964 08:36:17 


1275 


MSGOO 
ERROR $REPORT 


#10,SP 

R1 

R1,@200 

32% 

Ri 

REG. ADR,RO 
16(RO),16(SP) 
#20000, 16( SP) 
37$ 
16(SP),20(SP) 
20( SP), TEMPS 
39$ 

R1,@2000 


38$ 
@MSGS9, - CSP) 
61, -(SP) 


REG. ADR,.RO 
16(RO),26(SP) 
26(SP), (SP. 


OMmSG20, -( 
2, -(SP) 
RO 


- ADR RO 
16(RO),24( SP) 
44% 
24(SP),26(SP) 
26( SP), TEMPS 
4S$ 


R2 
R2, 0200 


VAX-11 Blies-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNAS.BLI;1 





INDEX 
INDEX, ¢ 


INDEX 


«, TMP .LOCATION 
s, TMP ° LOCATION 


¢, TMP .LOCATION 
TMP .LOCATION, « 


INDEX, + 


SP ,« 


¢, TMP .LOCATION 
TMP .LOCATION, # 


SP, 


INDEX 
INDEX, * 


e,$sTMP2 
@,$$TMPl 


$$ TMP 
$$TMP1 


$$TMP2 


e, TMP .LOCATION 


¢, TMP .LOCATION 
TMP .LOCATION, « 


INDEX2 
INDE X2,* 


SEQ 0133 
Pege SO 
(19) 


2510 


2512 


2515 


2514 
2454 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 7 - ETHERNET CARRIER SENSE TEST 


006154 ' 
000000G 


000000G 


000001 


000000G 
000016 000034 
000034 


000000G 
000002 


000010 


040000 000010G 
601000 000010G 


000000G 
000001 


**9000G 
000001 


000000G 
037777 000012G 


000000G 
000001 


45$: 


463: 


47%: 


E1ii 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


45$ 
31% 
TEMPS , #2200 
46% 


@mMsSG59, -(SP) 
¢1, -(SP) 
SP .RO 


14 
REG.ADR,RO 
16(RO),34(SP) 
34(SP),(SP) 


SP 
ee ee 
#1000, XMIT.D.LIST+10 


(SP),-CSP) 
PC ,.CHK.CSR. STATUS 
0400 , XMIT.D.LIST+10 


é 


VAX-11 Bliss-16 V4.0-579 


SEQ 0134 


Pege 51 
SPIDERSUSERS : (BERG .DEQNA JNQNAS.BLI;1 019) 


; SP, 


3 
; *,TMP.LOCATION 
; TMP.LOCATION, + 


; SP, 


; SP, 


; SP, 


2520 
2523 


2533 


2531 


2549 


; Routine Size: 


FUNCTIONAL TEST 


CNQNAAO DEQNA 
TEST 7 - ETHERNET CARRIER SENSE TEST 


012716 000000G 
012746 000001 
0600 


000010 


006150’ 
000034 


621 words. 


48%: 


493: 


; Maximum stack depth per invocation: 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 


004737 
104466 
006000 
103773 
000207 


6 words, 


T7:: 
1%: 


Routine Base: 
words 


; Maximum stack depth per invocation: 2 


; 2557 1 
3 2558 1 


MOV 


ese 


a 


S328 


RTS 


Routine Base: ABSCODES 
words 


. SBTTL 


Pash 


RTS 


Fil 


12-Jul-1984 15:04:10 
21-Jun-1984 08:36:17 


SEQ 0135 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG . DEQNA JNQNAS .BLI;1 


i 
; SP,« 


T7 TEST 7 - ETHERNET CARRIER SENSE TEST 


PC, $17 
66 


RO 
i$ 
PC 


ABSCODE$ + 7114 


Ss. 
(19) 
2550 


2551 


2555 


oF G8 OF GF OF OF OF GF OF GF GF SF GF GF GH GF GF GF GF Ge OF GF BF BF GF GF GF Ge Gs OF OF BF OF Or SF OF OF Os oe OF Os OF OF Os Os Os 


i 


> ee be ae Be be Be he Bt Pe bee fe fee ae et fee et fe fe ee fee fe be ae fee ee fee fet ae he bee ee ee ee ee ee ee pe ee es he ee ee 





Gil 


ate 


SEQ 0156 


12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 


AO DEQNA FUNCTIONAL TEST 
21-Jun-1984 08:36:17 


CNQNA 
TEST 8 - STATION ADDRESS RAM TEST 
SSBTTL ‘TEST 8 - STATION ADDRESS RAM TEST’ 


See 
TEST 8: 


DESCRIPTION: 


This test verifies that Station Address RAM hes no otetis faults. 
The host writes and then reeds date ~~? to ell of the 
addressable RAM ( 128 decimal bytes ). The date is checked to see 
that the dete pattern received is the same as the date pattern 
transmited. This test continues until all the date o_o ere 
exhausted. If the operator specifies loop on error, pag one 
re-executes the code that detected the error until tC is en . 


The following BINARY patterns are used: 


STATION ADDRESS RAM TEST 


11111111 00000000 
10101010 01010101 
11001100 00110011 
11110000 00001111 
marching 1's, propagating 1's through the RAM 


aavenielh 0's, propegeting O's through the RAM 





CSR register - Receiver Enable (bit 0) 
Portion of Receive and Transmit FIFO 


pettern 
load transmit packet wi pattern 
transmit loopbeck packet rt oil of the RAM) 


pecket 
check for expected loopback status 


ee error message if not inhibited 


cell compere _peckets 
ENDREPEAT 


; 


r=) 
SPIDER SUSERS : (BERG. DEQNA JNQNAS.BLI;1 


ege 53 
(20) 


Hil 


SEQ 0137 


3 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX- iss- 
v01.0 TEST 8 - STATION ADDRESS RAM TEST 21-Jun-1984 08:36:17 SPIDERSUSERS 11 BERG DEQUAINONAS.OLI.1" 
8 2605 5 BGNTST; 
3 2606 3 
:; 2607 3 RESET_DEQNA ( ); 
3 2608 3 
; 2609 3 DECR INDEX1 FROM 7 TO O DO 
; 2610 4 BEGIN 
; 2611 4 INCR INDEX2 FROM O TO je? 10 
; asia : XMIT_BUFFER [ .INDEX2 } = .PTRN_TABLE [ .INDEX1 }; 
: 
; 2614 6 BGNSUB ; 
3 2615 6 XMIT_SETUP_PACKET ( N_MODE ); 
> 2616 4 ENDSUB; 
; 2617 3 END; 
3 2618 3 
: = : : reese ef.) al 
: 2620 : INCR INDE 
; 2621 3 : BEGIN ee 
; e622 3 : Pi = ZERO; 
; 2623 3 ® P2 = .INDEX1; 
; 2624 3 : WALKING. i é 3 
-—_— = oa a. ACKE 

8 XM : T 
= = : I € UP_P TC Dds 
et to Sore pe 

. a 2 x s ° ~«¢ - 
. 3630 Ps =" . }=¢ XMIT_GUFFER [ . x }))- 1s; 
3 : T_SETUP _PACKET 
3 2632 3 : END; a 
. io - 
; INDEX FROM T ad 
363s ‘ a 1 0 TON i DO 
F INCR INDEX FROM O TO N_MODE - 
; 2637 4 XMIT_BUFFER [ . INDEX } = ZERO: ” 
>; 26 4 XMIT_BUFFER [ J INDEX1 } *« SX’ FF’; 
$ 2639 4 
| ies ETUP_PACKE MODE 
3 XMIT TUP _P 
> 2642 4 ENDSOB 5 <a rg. " 
s 2643 4 
; 2644 4 INCR INDEX FROM O TO .P3 00 
' 2645 : XMIT_BUFFER ({ . INDEX ] = ( - .XMIT_BUFFER [ .INDEX }) ) - 1; 
: 2647 6 BGNSUB ; 
5 5ea9 8 a 
; 2650 4 . 
3 2651 3 
$ 2652 1 ENDTST; 

-SBTTL $78 TEST 8 - STATION ADDRESS RAM 

000000 0041 000000G $78: JSR R1, $SAVE3 - a 
000004 004737 000000G JSR PC,RESET.DEQNA : 


ege 54 
(21) 


2556 
2607 


—- eee 


; Routine Size: 
; Maximum stack 


012701 
005000 
116160 
005200 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 8 - STATION ADDRESS RAM TEST 


177777 

000000G 
000000G 
000000G 


000200 
000000G 


000177 


73 words, 
depth per invocation: 


1$: 
2$: 


3$: 


4$: 
S$: 


6$: 


8$: 
9%: 


ae 


Til 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


sm 

a TABLECR1), XMIT.BUFFERCRO) 
RO,@177 

es 


6200, -(SP) 
+ 


RO 

a 
RO,0177 

0377 , XMIT .BUFFERCR1 ) 


2 

$200, -(SP) 

PC. XMIT.SETUP .PACKET 
(SP)- 


67 

RO 

6$ 

RO 

8$ 

@-1,R2 

R3 
ee 


R2, XMIT .BUFFER(RO) 


$200. -(SP 


Routine Base: ABSCODE$ + 7130 
6 words 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG . DEQNA JNQNA3.BLI;1 


+, INDEX1 

INDE X2 

#C INDEX1), «€ INDEX2) 
INDEX2 

INDEX2 , « 


INDEX1 
INDEX1 
INDEX 

*C INDEX) 
INDEX 
INDEX, 
*,*( INDEX1) 


INDEX 


#( INDEX),« 
*,*C INDEX) 
INDEX 
INDEX, 


INDEX1 
INDEX1,@ 


SEG 0136 
Page 55 
(21) 


2645 


2645 


J1i1 


NQNA3 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss- . am Cane 

vo1.0 TEST 8 - STATION ADDRESS RAM TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : [BERG_DEQNAINGNAS .BLI;1°*cai5 
.SBTTL 18 TEST 8 - STATION ADDRE 

000000 004737 007130' Ts: : STATION SS RAM TEST 

000000 1$; JSR PC, $78 ; 

000004 104466 TRAP = 66 2651 

000006 006000 ROR RO 

000010 103773 BLO 1$ 

000012 000207 RTS PC 

; Routine Size: 6 »ords, Routine Base: ABSCODES + 7552 

; Maximum stack depth per invocation: 2 words 


; 2653 1 


SF OF GO GF GF GE GF GF GF GP OF Ge GF GF GF Ge Ge GF Ge GF Ge Ge Gs GF Ge Ge Ge Ge Ge Ge GF Gs Ge Ge GS Ge Ge GF Ge Ge Gs Ge OF 6s oo 


Pe ee ee ee be ee ee ee ee Be he Be ee be ee be ee be ee ee Be ee ee ee he he be ee be pe ee ee he 


Kit 


SEQ 0140 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13; 
TEST 9 - PROMISCUOUS STATION ADDRESS TEST 21-Jun-1984 068: 


SSBTTL ‘TEST 9 - PROMISCUOUS STATION ADDRESS TEST’ 


See 


04:10 VAX-11 Bliss-16 V4.0-579 
36:17 SPIDERSUSERS : (BERG. DEGNA JNQNAZ .BLI;1 


TEST 9: PROMISCUOUS STATION ADDRESS TEST 


DESCRIPTION: 


This test verifies that DEQNA promiscuous addressing mode functions 
as specified. Bit patterns and addresses in and out of the r of 
setup addresses are used to assure that there is true promiscuity. 
If the operator specifies loop on error, the program re-executes the 
code that detected the error until tC is entered. 


Hardware tested: Promiscuous addressing mode logic 
Set of Target Addresses in HEXADECIMAL: 


00-00-00-00-00-00 
AA-AA-AA-AA-AA-AA 
55-55-55-55-55-55 
FF -FF -FF -FF -FF -FF 
Walking 1, shi ting 1 across the Target Station Address 
Walking 0, shifting 0 across the Target Stetion Address 


Processing: 


BEGIN 
reset device 
select internal loopback mode 
set mode to Setup 
set ‘promiscuous’ addressing mode bit 
REPEAT for each Terget Address 
load Terget Address of the packet 
disable receiver 
transmit loopback packet 
enable receiver 
check for expected loopback status 
IF error 
THEN 
Sa. error message if not inhibited 


cell compere_packets 
-— 


P 


ege 57 
(22) 


Oe G0 GF Ge GF GF Ge G2 GF OF GF GF GF GF OF GF SF GF GF OF Ge Ge Ge Ge Ge GF GF Ge Ge GF Ge GS Ge Ge OF Os BF OF ee OF Os OF Oe oe os oF 
N 
'w 
Us 


000012 


MPUWAUWWN RP aDDaA DS HLA HALALHALSSAWWWWWWwwwVywwwwwwwwwwuw 


Lil 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15:04:10 
TEST 9 - PROMISCUOUS STATION ADDRESS TEST 21-Jun-1964 08:36:17 


BGNTST; 


VAX-11 Bliss-16 v4.0-579 
SPIDERSUSERS : [BERG .DEQNA JNQNA3 BLI;1 


"RESET DEQNA AND INITIALIZE —* STATION ADDRESS RAM IF EXECUTING 


Ses 
a 
t TESTS IN EXTERNAL LOOPBACK 
e. 


RESET_DEQNA ( ); 

PREP _ FOR _ SETUP ( ); 

INCR INDEX1 FROM 1 TO 14 DO 
WRT_STATION_ADR ( yINDEX1. PHA_INDEX ); 


BGNSUB ; 
XMIT_SETUP_PACKET (€ P_MODE ); 
ENDSUB ; 


RBUF _LENGTH = 6; 
XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 


INCR INDEX1 FROM 0 TO 99 DO 
BEGIN 
SELECTONE .INDEX1 OF 


SET 
{ 0T03 }: 
WRT_STATION_ADR ( ZERO, .INDEX1 ); 
{ 417051 }: 
WALKING BIT ( ZERO, .INDEX1 - 4, 5 ); 
{ S2 TO 99 }: 


WALKING BIT € ONE, .INDEX1 - S2. 5 ); 
TES; 


WRT_STATION_ADR (€ ZERO, ZERO ); 


BGNSUB ; 
XMIT_ILOOP_PACKET ( ZERO ); 
3 


END; 


INCR INDEX FROM O TO 5S DO 
TARGET_ADR { .INDEX ] = ZERO; 


ENDTST; 
.SBTTL $T9 TEST 9 - PROMISCUOUS STATION ADDRESS TEST 
$79: MOV R1,-CSP) 3 
000000G JSR PC RESET .DEQNA 3 
000000G JSR PC,PREP .FOR. SETUP 3 
000001 MOV #1,R1 ; *, INDEX1 


NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 


SEQ 0141 
Pege 58 
(23) 


or ee 


010146 
012746 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 9 - PROMISCUOUS STATION ADDRESS TEST 


1$: 
000023 
000000G 


000016 


2s: 
000202 
000000G 


000006 000000G 
000006 


3$: 


000064 5$: 


Mil 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


Ri, -(SP) 

023,-(SP) 
PC,WRT.STATION. ADR 
CSP)+,CSP)-+ 

R1 

R1,@16 

1$ 

2 

#202, -(SP) 

PC, XMIT.SETUP .PACKET 
(SP )+ 


67 
RO 


2s 

6,RBUF .LENGTH 
RO 

RO, XBUF .LENGTH 
R1 

R1 

at 

R1,03 

44 

-(SP) 

Ri, -(SP) 

PC, ,WRT.STATION. ADR 


CSP)+,CSP)+ 
R1,04 

3$ 

R1, 065 


#5,- SP) 
—ee 


»WRT .STATION. ADR 


2 
(SP) 
PC, XMIT.ILOOP.PACKET 


VAX-11 Bliss-16 V4.0-579 


SPIDERSUSERS : (BERG . DEQNA JNQNAS.6LI;1 


; INDEX1,+« 


; INDEX1 
; INDEX1,+« 


; INDEX1 

; INDEX1 

; INDEX1,+« 
; INDEX1,+« 
t INDEX1,¢ 
; INDEX1,# 
; INDEX1,* 


; INDEX1,¢ 
3 INDEX1,# 


INDEX1, 


SEQ 0142 
Page 59 
(23) 


2709 
2708 


2709 
2712 


2709 
2712 


2719 
2720 


2722 
2726 


2727 


2724 
2728 


2729 
2730 


2731 


2734 


2737 


— 


Nii | 


NQNA3 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 ~~ 60 
v01.0 TEST 9 - PROMISCUOUS STATION ADDRESS TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG . DEQNA JNQNAS.BLI;1 (23) 
000246 104467 TRAP 67 
000250 ROR RO 
000252 103771 BLO 
000254 022626 CMP CSP)+,¢SP)+ ; 2723 
000256 005201 INC ; INDEX1 2722 
000260 020127 000143 CMP R1,¢143 ; INDEX1,+« 
000264 003711 BLE 3$ 
000266 005000 CLR RO ; INDEX 2742 
000270 105060 000000G 9$: CLRB TARGET .ADRCRO) ; *C INDEX) 2743 
000274 005200 INC RO ; INDEX 2742 
000276 O 7 000005 CMP RO, 05 ; INDEX, 
000302 003772 BLE ‘ 
000304 012601 MOV CSP)+,R1 $ 2652 
000306 RTS 
; Routine Size: 100 words, Routine Base: ABSCODE$ + 7366 
; Maximum stack depth per invocation: 5 words 

-SBTTL TS TEST 9 - PROMISCUOUS STATION ADDRESS TEST 
000000 004737 907366' T9:: 
000000 1$: JSR PC,$T9 ; 2743 
000004 104466 TRAP 66 
000006 006000 ROR RO 
000010 103773 BLO i$ 
000012 000207 RTS PC 
; Routine Size: 6 words, Routine Base: ABSCODE$ + 7676 
; Maximum stack depth per invocation: 2 words 


; 2745 1 


Pe Oe Be ee Fe be Pe be be be be Pe be Be he be be Oe he be Be ho ee ee he 


Ble 


CNQNAAO OEONA FUMCTIWE TEST 12-Jul-1964 153: 
TEST 10 - [RANSMIT AMD RECEIVE FIFO MEMORY TEST 21-Jun-1964 06: 


SSBTTL ‘TEST 10 - TRANSMIT AM RECEIVE FIFO MEMORY TEST" 


TEST 10: TRANSMIT AMD RECEIVE FIFO MENORY TEST 







legic 
¢ first 1512 bytes ) 
ic 


Receive FIFO memory ( first 1512 bytes ) 


The following BINARY petterns ere used: 


11111111 00000000 
10101010 01010101 
11001100 00110011 
11110000 00001111 
Processing: 
BEGIN 


reset device 
select internel/extended loopbeck mode 
REPEAT for each pattern 
write link memory with pattern - transmit loopback packet 
reed link memory with pettern - receive loopback packet 
gen for expected loopbeck status 
error 


grint error message if not inhibited 


cell compere _peckets 
— 







SS OS OS OD OS OD OD OS OS OS OS OS OS OS OS OS OS OS OS OS OS FS OS OS 8S 6S OS 6H 6.) © HS OO OO FO FO FO OO Oe HO OO OO tO tO 


210 VAX-11 Bliss-16 V¥4.0-579 
17 SPIDERSUSERS : [BERG . DEQNA 


s£0 0164 
é 
NONAS .OLI;1 ™s 24 


| 
| 


Ll | 
P 


VNU UUUUUUUUUULSAPGAAAAP SSL HSHASHASAdSASVVVS 'HDSSlWUUwuwwuwwwue 





Cie 
SEQ_0145 


CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 v4.0-579 Dege 62 
TEST 10 - TRANSMIT AMD RECEIVE FIFO MEMORY TEST 21-Jun-1984 08:36:17  SPIDERSUSERS.[BERG.DEQNAINGNAS.BLI;1 (25) 


BGNTST; 


LOOPBACK 1514 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 











RBUF _LENGTH = LONGEST _PACKET; 
.RBUF “LENGTH t -1 ds 


XBUF LENGTH = - ¢ 

INCR INDEX FROM O TO 7 DO 

RESET_DEGNA ( ); 

TEMP1 = O; 

INCR INDEX FROM © TO 169 DO 
ae ee ere 


XHIT_BUFFER { .TEMP1 ) = .PTRN_TABLE [ .INDEX2 ]}; 
TEMP1 = .TEMPL + 1; 
3 














See 
§ ROTATE PATTERN TABLE 


TOPe ns .PTAN.TABLE [ O 3 
INCR INDE Aga © T0 6 DO 

PTRN TABLE’ { VINOEXS ] = .PTRN_TABLE { .INDEX3 + 1 ); 
PTRN_TABLE [ TEMP2; 











END; 
~~ FROM O TO LONGEST_PACKET - 1 DO 
INCR X FROM O TO LONGEST PACKET - 1 DO 
} = ZERO; 


INDE 
XMIT_BUFFER [ . INDEX 
XMIT_BUFFER [ .INDEX1 } = sx’ FF’; 











BGNSUB ; 
SET "ROESCR. LIST ( .XBUF_LENGTH, VE ); 
SET XDESCRL LIST Est ( ,NOUF LENGTM. VE ); 
seni ZERO ‘ 

ore ane OOAEKETS. C )s 

EnDsue 


INCR INDEX FROM O TO .P3 00 
XMIT_BUFFER [ .INDEX ] = ( - .XMIT_BUFFER [ .INDEX ] ) - 1s 


- © © @F Ge Ge oF oe oe oe oe 
o 
WUUUUUu Uw 


CNGNAAO DEGNA FUNCTIONAL TEST 
TEST 10 - TRANSMIT 


BGNSUB; 
SET_RDESCR_LIST ( 


12-Ju :04 
AND RECEIVE FIFO MEMORY TEST 21-Jun-1984 08:36: 


Die 


1-1984 15 


4 
: 
: .XBUF _LENGTH, VE ); 
g SET sXOESCR “LIST + MS +e VE ); 
4 SEND ZERO ); 
: SOD ARE PACKETS ( ); 
: ENDSUB; 
: END; 
ENDTST; 
-SBTTL $T10 TEST 10 - TR 
000000G $T10: JSR R1, $SAVES 
002752 000000G MOV 2752 ,,RBUF .LENGTH 
002752 MOV $2752,R0 
ASR RO 
NEG 
MOV RO, XBUF .LENGTH 
000010 MOV #10,R3 
1%: JSR PC RESET .DEQNA 
CLR TEMP1 
000276 MOV 6276 ,R2 
2s: CLR 
000000G 3$: MOV TEMP1.R1 
000000G 000000G MOVB PTRN. TABLECRO), XMIT.BUFFERCR1) 
000000G INC TEMP1 
INC RO 
000007 CMP RO, 07 
BLE 3$ 
DEC R2 
BNE 2s 
000000G CLR TEMP2 
000000G 000000G my * tp eae tates 
000001G 000000G 43%: = PTRN. TABLE +1(RO),PTRN. TABLECRO) 
000006 CMP RO, 06 
BLE 4$ 
000000G 000007G MOVE TEMP2 ,PTRN. TABLE+7 
S$: TRAP a 
000000G MOV XBUF .LENGTH, -( SP) 
120000 MOV @-60000, -( SP 
000000G JSR PC,SET.RDESCR. LIST 
000000G MOV XBUF .LENGTH, (SP) 
120000 MOV @-60000, - (SP) 
000000G JSR PC,SET.XDESCR.LIST 
CLR (SP) 
000000G JSR PC, SEND.ELOOP .PACKET 
000000G JSR PC, COMPARE .PACKETS 
000006 ADD 66 ,SP 
TRAP 67 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG . DEQNA JNQNAS .BLI;1 





ANSMIT AND RECEIVE FIFO MEMORY TEST 


¢, INDEX 

¢, INDEX1 
INDE X2 

*C INDEX2),* 


INDE X2 
INDEX2,¢ 


INDEX1 


INDEX3 

#C INDEX3), «( INDEX3) 
INDEX3 

INDEX3, ¢ 


SEQ poise 
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SEQ 0147 

NQNAS CNQNAAO DEQNA FUNCTIONAL T 12-Jul-1984 13:04:10 VAX-11 Blies-16 V4.0-57 
v01.0 TEST 10 - TRANSMIT AND KECEIVE FIFO MEMORY TEST 21-Jun-1984 08:36:17 SPIDERSUSERS s {BERG DEQNAINONAS.BLI-1 coe, 
000214 006000 ROR RO 
000216 103751 BLO S$ 
000220 005303 DEC R3 s INDEX 2800 
000222 001303 BNE i$ 
000224 000207 RTS PC $ 2744 
; Routine Size: 75 words, Routine Bese: ABSCODES + 7712 
; Maximum stack depth per invocation: 8 words 

.SBTTL T10 TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST 
000000 004737 007712’ T10:: ” 
000000 1s: JSR PC,.$T10 $ 2827 
000004 104466 TRAP 66 
000006 006000 ROR RO 
000010 103773 BLO 1$ 
000012 000207 RTS PC 
; Routine Size: 6 words, Routine Bese: ABSCODES + 10140 
; Maximum stack depth per invocation: 2 words 


; 286ss 1 


ell seek cael el eel el cee eel el ol oe cel oe ol eh ol oe ed oe ed ed ed od ed od ed ed Lod od el ed et or ee ee ee ee ee ere 


Fie 


SEQ 0148 


VAX-11 Bliss-16 V4.0-579 
SPIDERKSUSERS : [(BERG.DEQNA JNQNA3.BLI;1 


12-Jul-1984 13:04:10 


FUNCTIONAL TEST 
-Jun-1984 08:36:17 


CNQNAAO DEQNA 
TEST 11 - PACKET LENGTH TEST 21 
SSBTTL ‘TEST 11 - PACKET LENGTH TEST’ 


See 


TEST 11: PACKET LENGTH TEST 


DESCRIPTION: 


This test verifies thet DEQNA can transmit and receive variable 
length packets ( equal to or greeter then 60 bytes end equal te or 
less than 1514 ayes without CRC ) without losing eny date 
in the process. his test elso verifies thet the 9th bit of the 
FIFO is not static (stuck et i/stuck at ar If the operstor 
specifies loop on error, the program re-executes the code that 


detected the error until tC is entered. 

Hardware tested: 

Processing: 
BEGIN 


reset device 
select internal/extended 


Transmit and Receive RAM 





 niaaes error messege if not inhibited 


END 

call compere_packets 

transmit loopbeck packet (packet length * up_count) 
loopback stetus and packet length 








Saga error message if not inhibited 


cell compere_packets 

decrement down _count 2 

increment up_count by 
ENDREPEAT 


Page 


65 
(26) 


Gle 


SEQ 0149 





NQNA3 CNQNAAO DEGQNA FUNCTIONAL TEST 12-Jul-1984 13:04;10 VAX-11 Bliss-16 v4.0-57 
v0O1.0 TEST 11 - PACKET LENGTH TEST 21-Jun-1984 08:36:17 SPIDERSUSERS: (BERG, DEQNAJNONAS.BLI.1) (255 
’ 2900 3 BGNTST; 
3 2901 3 
toe ee ~—st LOOPBACK PACKETS OF INCREASING AND DECREASING PROPE 
: : LENGTH THEN CHEC e 
3 2904 3 ' RECEIVED se _ 
3 2905 3 $-- 
3 2906 3 
: 2907 3 COUNTER = ZERO; 
; 2908 3 UP_COUNTER = SHORTEST_PACKET; 
: Ses : DOWN_COUNTER = LONGEST_PACKET; 
3 
3 poy : INCR INDEX1 FROM SHORTEST_PACKET TO MAX_LENGTH BY STEP1 DO 
3 
3 2913 4 
3 2914 4 
3 2915 4 
3 2916 5 
3 2917 5 
3 2918 5 
3 2919 5 
3 2920 5S 
3 2921 5 
3 2922 5 
3 2923 5 
: 2924 5 
: 2925 5 
3 2926 4 
3 2927 5 
; 2928 5 
3 2929 5 
3 2930 5 
3 2931 5 
3 2932 5 
3 2933 5 
; 2934 5 
3 2935 5 
3 2936 4 
3 2937 4 
3 2938 6 
$ 2939 6 
s 2940 6 
3 2941 6 
5 2942 6 
s 29435 4 
3 2944 4 
3 2945 3 
s 2946 1 
-SBTTL $T1i TEST 11 - PACKET LENGTH TEST 
000000 004137 000000G $Ti1: JSR R1, $SAVE2 ; 2654 
37 CLR COUNTER ; 2907 
2908 


600004 0050 000000G 
000010 012737 000074 000000G MOV 074, UP .COUNTER : 





Hie 


12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 — Aaa 
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21-Jun-1984 08:36:17 SPIDER SUSERS : [BERG.DEQNA JNQNA3.BLI;1 (27) 


CNQNAAO 
TEST 11 - PACKET LENGTH TEST 





012737 002752 000000G MOV 02752 ,D0WN. COUNTER ; 
012702 000074 MOV 074 ,R2 ; *,INDEX1 2911 
004737 000000G 1$: JSR PC RESET .DEQGNA ; 2913 
yo gh 000000G on _— $ 2914 
0010 
013700 000000G MOV UP .COUNTER ,RO ; 2917 
010037 000000G MOV RO, RBUF .LENGTH 
005001 CLR Ri ; INDEX 2919 
000403 BR 3$ 
110161 000000G 2s: MOVB R1,XMIT.BUFFERCR1) s INDEX, *( INDEX) 2920 
INC Ri s INDEX 2919 
020100 3$: CMP R1,RO . INDEX, « 
0027735 BLT 2s 
005300 DEC RO $ 2921 
000402 BR 5$ 
105060 000000G 4$: CLRB XMIT .BUFFERCRO) 3 *C INDEX) 2922 
005200 5$: RO s INDEX 2921 
020027 002775 s INDEX,« 
003772 
062737 000002 s 2923 
012737 000001 3 
0004 $ 2914 
013700 000000G 6%: 8 2928 
010037 000000G 
s INDEX 2930 
110161 000000G 7$: : INDEX, «( INDEX) 2931 
; INDEX 2930 
020100 8$: ; INDEX,¢ 
002773 
005300 ; 2932 
000402 
105060 000000G 9$: ; *C INDEX) 2933 
005200 10%: ; INDEX 2932 
002775 ; INDEX,« 
003772 
162737 000002 $ 2934 
005037 000000G 3 2935 
013700 000000G 11%: ne ; 2918 
RO 
010037 000000G RO, XBUF .LENGTH 
12%: TRAP 2 ; 2936 
013746 000000G MOV XBUF .LENGTH, -( SP) 3 2939 
012746 120000 MOV #-60000, -( SP 
004737 000000G JSR PC, SET. RDESCR.LIST 
013716 000000G MOV XBUF .LENGTH, (SP) 3 2940 
012746 120000 MOV @-60000, -( SP) 
004737 000000G JSR PC .SET.XDESCR.LIST 
005016 CLR (SP) : 2941 
004737 000000G JSR PC, SEND .ELOOP . PACKET 
004737 900000G JSR PC, COMPARE .PACKETS : 2942 
062706 000006 ADD 06 ,SP : 2936 


; Routine Size: 102 words, o 
; Maximum stack depth per invocation: 7 words 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 6 words, 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 11 - PACKET LENGTH TEST 


02 000002 
020227 002776 


Routine Base: 


004737 010154’ Mt 2: 
104466 : 
006000 

103773 

000207 


Routine Base: 


; Maximum stack depth per invocation: 


>; 2947 1 





Iie 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


TRAP 67 

ROR RO 

BLO 12$ 

ADD #2 ,R2 
CMP R2,02776 
BLE i$ 

RTS PC 


ABSCODE$ + 10154 


-SBTTL Til TEST 11 - PACKET LENGTH TEST 


JSR PC.$Til 
TRAP 66 
ROR RO 
BLO 1$ 
RTS PC 


ABSCODE$ + 10470 


VAX-11 Bliss-16 V4 0-579 Page 68 
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3; *,INDEX1 
3 INDEX1,¢ 


SEQ 0151 





Jle 


SE 
NQNAS CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 py 69 
v01.0 TEST 12 - NXM INTERRUPT TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG .DEQNA JNQNA3.BLI;1 (28) 
: 2948 1 *@SBTTL ‘TEST 12 - NXM INTERRUPT TEST’ 
; 2949 : + 
; 2951 1 ' TEST 12: NXM INTERRUPT TEST 
: 2952 1 : 
: 2953 1 ' DESCRIPTION: 
: 2954 1 : — . — * a. 
s gee & : This test verifies that Transmit and Receive List Invalid bits 
; e9sé6 1 : (CSR bits 4 and 5S) can be set and reset as specified and that both, 
>; 2957 1 : Transmit and Receive Descriptor List addresses in the I/0 page have 
: yee 1 : to be valid to succesfully loopback e packet. 
; 1 : 
; 2960 1 : After ea software reset Transmit and Receive List Invalid bits are 
; 2961 1 : checked for their initial condition state (both set). Then these bits 
: 2962 1 8 are cleared by writing Transmit Receive Descriptor List addresses 
; 2963 ; : into Transmit and Receive Buffer Descriptor Registers. 
: 2964 8 
s dene i : First. valid loopback packet is sent to verify that UUT properly 
; 2966 1 : transmits and receives loopback packets. Then, a Non-Existant 
; 2967 1 : Memory Access ( NI ) bit is forced to ” 1 " each time an invalid 
3 —- : : leopback packet is sent. 
: : 
; 2970 1 : If the operator specifies loop on error, the program re-executes the 
3 oan : : code that detected the error until tC is entered. 
3 : 
3 2973 1 : Hardware tested: Q-Bus to QTOC interface 
>; 2974 1 s - Valid and invalid host memory 
s 2975 1 : eddress processing 
: 2976 1 : CSR register - NXM eccess (bit 2) 
3 2977 i : - Interrupt Enable (bit 6) 
s 2978 1 : - XMIT List Invalid (bit 4) 
3 Sb : 8 - RCV List Invalid (bit 5) 
; s 
3 2981 : : Use following Descriptor List and buffer addresses: 
; 2983 1 8 
3 2984 1 s TRANSMIT RECEIVE 
; 2985 1 6 6666666 26662866 
; 2986 1 s 
$ pha dd : : DESCR LIST ADR BUFFER ADR DESCR LIST ADR BUFFER ADR 
: 2989 1 8 
3 2990 1 : VALID VALID VALIO 
>; 2991 1 $ INVALID ‘T CARE DON'T CARE DON’ T CARE 
;s 2992 1 $ VALID INVALID DON’T CARE DON'T CARE 
; 2993 1 $ VALID VALID INVALIC DON’ T CARE 
3 2994 1 : VALID VALID VALIO INVALID 
3 2995 1 § 
; 2996 1 See eee ee eee eee em eee eee Re ERE EERE RE EEE ER ERE EON 


PO he ae Pe be he bee ae be bee ee ee ee bt bet fe Pe be he ee ee ee bee be ee ee ee ee ee ee 





CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 12 - NXM INTERRUPT TEST 


Kile 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


Processing: 
BEGIN 


reset device ( disables device interrupt ) 
oan, tess loopback mode 


read 
—" and RCV List Invalid bits not = 1 
Zo error message if not inhibited 


enable device interrupt (set CSR bit 6) 

transmit valid l packet 

check for expected loopback stetus 

IF error 

oe f not inhibited 
print error message if not inhibi 

ENDIF 


cell compare_paciets 

REPEAT for each set of addresses in the set 
transmit invalid loopback packet 
IF NXM interrupt didn't occured 
a error message if not inhibited 
check for expected loopback stetus 
IF error 


THEN 
oo error message if not inhibited 


END 
ENDREPEAT 


END 


VAX-11 Bliss-16 V4.0-579 
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SEQ 0153 
Page 70 
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WT TT nd Gd Gd Ct Gd Gd Gd UT OD DU TT Td dd Gt dt dd dt Gt dt td tT Tt dt dt td dt Gt tt 


Lie 


12-Jul-1984 13:04:10 


FUNCTIONAL TEST 
mao R 21-Jun-1984 06:36:17 


CNQNAAO 
TEST 12 - NXM INTERRUPT TEST 
BGNTST; 


See 
* RESET DEQNA AND SELECT LOOPBACK MODE 


RESET_DEQNA ( ); 


TNCR” INDEX. FROM 1 10 14 DO 
WRT_STATION_ADR ( .INDEX, PHA_INDEX ); 


BGNSUB ; 
XMIT_SETUP_PACKET ( N_MODE ); 
ENDSUB; 


RBUF _LENGTH = 
XBUF_LENGTH = - . -RBUF _LENGTH f -1 ); 


CLR_BUFFERS ( B_SIZE ); 
ERR_NUMBER = ZERO; 


LOOPBACK PACKET WAS PROPERLY RECEIVED AND NI BIT IN CSR = 


RESET _DEQNA ( ); 
WRT_STATION_ADR ( ZERO, PHA_INDEX ); 


XMIT ILOOP_PACKET ( ZERO ):; 
IF GET-BIT"C CSR, NI ) 


BIT ( CSR_ALL ); 
); 
. 
3 
1201, MSGOO, ERRORSREPORT ); 
END 
ENDSUB; 


; 
RESET _DEQNA ( ); 

IOP_TABLE { XLO_ADR ] = NXM_LO_ADR; 
.I0P_TABLE [{ XHI_ADR ] = NXM_HI_ADR; 
IF NOT GET_BIT ( CSR, NI ) 


"TRY TO LOOPBACK A PACKET WITH INVALID TRANSMIT DESCRIPTOR ADDRESS, 
= CHECK FOR NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET TO 1 


SEG 0154 


VAX-11 Bliss-16 V4.0-579 


P 
SPIDERSUSERS : [BERG .DEQNA JNQNAS .BLI;1 


“LOOPBACK A PACKET, VALID DESCRIPTORS AND BUFFER ADDRESSES, THEN CHECK IF 


ege 71 
(30) 


q 


SAMA AAU DAAAAAMAMNMMNMNUMUUUNIN UUW WWW WLIO AORAOAU 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 12 - NXM INTERRUPT TEST 


Mie 


CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSGS5S9 ); 

PRINTB ( MSG29 ); 

PRINTB ( MSG27 ); 

ERRDF ( 1202, MSGOO, ERRORSREPORT ); 


TRY TO LOOPBACK A PACKET WITH INVALID RECEIVE DESCRIPTOR ADDRESS, 
THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET TO 1 


SET_DEQNA ( ); 
WRT STATION.ADR ( ZERO, PHA_INDEX ); 


-IOP_TABLE [ RLO_ADR } = NXM_LO_ADR; 
-IOP_TABLE { RHI_ADR ] = NXM_HI_ADR; 


SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
.IO0P_TABLE { XLO_ADR } = XMIT D LIST; 
-IOP_TABLE [ XHI_ADR } = ZERO; 

CHK _RIXI_STATUS (€ ONE ); 


CHK_CSR_STATUS ( #0'000220', #0'000220' 


); 
CHK”XMIT_STATUS ( XFLG_STATUS, XWD12_ STATUS ): ! 0’ 140000’, 


.IOP_TABLE ({ CSR ) = EENABLE; 

DELAY ( 20 ); 

IF NOT GET_BIT ( CSR, NI ) 
THEN 


BEGIN 
-IOP_TABLE { CSR ] = DISABLE; 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSG27 ); 
ERRDF ( 1203, MSGOO, ERRORSREPORT ); 


END; 
-IOP_TABLE { CSR ) = DISABLE; 
3 


RY TO LOOPBACK A PACKET WITH INVALID TRANSMIT BUFFER ADDRESS, 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


SEQ 0155 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG . DEQNA JNQNAS .BLI;1 


0’ 000400’ 


T 
THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET TO 1 


ege 72 
(30) 


Nie 


NQNAS CNQNAAO DEQGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 
vO1.0 TEST 12 - NXM INTERRUPT TEST 21-Jun-1984 08:36:17 


RESE Leen . 2 
SE 


NTB (€ MSG29 ) 
PRINTB (€ MSG27 ); 
ERRDF ( 1205, MSGOO, ERRORSREPORT ); 


END; 
.IOP_TABLE [ CSR ) = DISABLE; 
SUB; 


; 5 

ae 

; 

; 3139 5 TABL XLO_ADR 

; 3140 5 OP_TABLE [{ XHI_ADR Ss = : 

3 3141 5 IF NOT GET_BIT (€ CSR, NI ) 

: 3142 5 

: 3143 6 BEGIN 

; 3144 6 CSR_WORD = GET_BIT ( CSR_ALL ); 

; 3145 6 PRINTB ( MSGS9 ); 

: 3146 6 Pr ¢ ); 

; 3147 6 PRINTB ( MSG27 ); 

: 3148 6 ERRDF ( 1204, MSGOO, ERRORSREPORT ); 
; 3149 5 END 

: 3150 3 ENDSUB; 

; 3151 3 

; 3152 3 fee 

$ 3153 3 * TRY TO LOOPBACK A PACKET WITH INVALID RECEIVE BUFFER ADDRESS, 
$ are : THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET TO 1 
; .—© 

3 3156 3 

3 3157 5 BGNSUB ; 

: 3158 5 RESET_DEQNA ( ); 

; 3159 5 

8 3160 5 SET_RDESCR_LIST ( .XBUF_LENGTH, VENXM ); 
3 3161 5 RCV_D_LIST { LOADR ] = NXM_LO_ADR 

: 3162 5 .IOP_TABLE [ 3 }) = RCV_D_LIST; 

: tors : .IOP_TABLE { RHI_ADR } = ZERO; 

3 

: 3165 5 SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 

; 3166 5 .IOP_TABLE { XLO_ADR }] = XMIT_D_LIST; 

3 te : .IOP_TABLE [ XHI_ADR } = ZERO; 

8 

$ tt : CHK_RIXI_STATUS ( ONE ); 

: 

: 3171 5 CHK_CSR_STATUS ( #0'000220', #0'000220' ); 
$ aire : CHK _XMIT_STATUS ( XFLG_ STATUS, XWD1i2_ STATUS ); § 0' 140000’, 
3 

3 3174 5 .IOP_TABLE [ CSR ) = EENABLE; 

: 3i75 5 

3 3176 5 DELAY ( 20 ); 

$ 3177 5 IF NOT GET_BIT ( CSR, NI ) 

3 3178 5 THEN 

3100 é oeeeR WORD IT € CSR_ALL ) 

3 = L Ds 

; 3181 6 IOP_TABLE { CSR } = DISABLE; 

3 

$ 6 

3 6 

3 6 

s 5 

$ 5 

3 3 


SEQ Fao 
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9’ 000400" 


Page 
(30) 
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TEST 12 - MXM INTERRUPT TEST 21-Jun-1984 08:36:17 SPIDERSUSERS:(BERG.DEQNA)NONAS BLI;1 (30) 
5190 1 ENDTST; 
.SBTTL $712 TEST 12 - Nott INTERRUPT TEST 
$Ti2: "OV R1,-CSP) : 2946 
000026 SUB €26.SP 
0000006 JSR PC. RESET. : 3036 
000000G JSR PC.PREP.FOR. SETUP ; 3038 
000001 MOV #1,R1 s @, INDEX 3039 
1%: mOv R1.-C(SP : INDEX,« 3040 
000023 MOV 023, -(SP) 
0000006 JSR PC, WRT. STATION. ADR 
CoP (SP)-.CSP)-« 
INC R1 ; INDEX 3039 
000016 CMP R1, 016 ; INDEX,« 
BLE i$ 
2%: Trap 2 ; 3040 
000200 MOV @200, -( SP : 3043 
000000G JSR T.SE 
3 3040 
TRAP ; 3043 
ROR 
BLO 
000006 0000006 MOV ; 3046 
000006 MOV ; 3047 
ASR 
NEG 
0000006 MOV 
004000 MOV ; 3049 
000000G JSR 
000000G CLR ; 3050 
000000G JSR : 3057 
CLR ) ; 3058 
000023 MOV 023, -(SP) 
38: TRAP 2 
CLR (SP) ; 3061 
0000006 JSR PC, XMIT. ILOOP .PACKET 
0000006 MOV REG. ADR.RO ; 3062 
000016 000004 MOV 16(RO),4(SP) 3 «, TMP,LOCATION 
000004 err (PC),4¢ SP) 3 , TMP .LOCATION 
000004 000006 MOV 4(SP),6(SP) ; ¢, TMP .LOCATION 3065 
000006 0000006 MOV 6(SP),CSR.WORD ; TMP.LOCATION, « 
0000006 MOV onSGS9, (SP) ; 3066 
000001 MOV 01, -(SP) 
MOV SP RO ‘ SP ,¢ 
TRAP ssa 
MOV @MSG29.( SP) ; 5067 
000001 MOV #1, -(SP) 
MOV SP.RO ; SP,« 
TRAP ss 





012716 900000G 


012746 
0600 


7 
012777 


FUNCTIONAL TEST 


CNQNAAO DEGNA 
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000001 


160000 
000077 


000000G 
000016 
000004 


000010 000012 
000012 0000006 


000001 


000000G 
000001 


4$: 
S$: 
000010G 
000012G 
000010 
000010 
68: 
78: 
000004G 
000006G 


008g 055 Gg222 


SEEFEEEEELE 


npn 


Cis 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


€77, @10P. TABLE +12 
REG. ADR ,RO 
16(RO), 10( SP) 

OC SP) 


023,- 


SP 
PC,SET.XDESCR. 


LIST 
@XMIT.O.LIST,@I0P. TABLE +10 


VAX-11 Bliss-16 V4.0-579 
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SP. 


¢, 1MP .LOCATION 
#, TMP LOCATION 


«, TMP .LOCATION 
TMP .LOCATION, « 


SP,« 


SP, 


SEQ 0156 
ege 75 
(30) 


3068 


3069 
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000001 
000000G 
000220 


12$: 


13%: 


Anposasewsooesee. 


DEC 


Dis 


12-Jul-1984 13:04:10 
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SIP. TABLE+12 


#1.(SP) 
ao 


CHK 


REG.ADR,RO 
16(RO),24(SP) 
04 ,24(SP) 


les 
@IOP . TABLE +16 


7$ 


PC RESET .DEQNA 
XBUF ,.LENGTH, (SP) 


@-57701, -(SP) 


PC,SET.XDESCR.LIST 


) 
PC, .XMIT.STATUS 
01,8I10P . TABLE +16 


VAX-11 Bliss-16 V4.0-579 
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*,$sTMP2 
«, $$TMPl 


$$TMP 
$$TMP1 


$sTMP2 


«, TMP .LOCATION 


; *,TMP.LOCATION 


s, TMP . LOCATION 
TMP .LOCATION, « 


SP, 


SP, 


eg ant - 
age 
(30) 


3107 
3109 


3111 


3112 


3114 
3116 


012737 


012777 
012701 


CNQNAAO DEQNA FUNCTIONAL TEST 
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SESSESSRSSSUSSHSSE SSE ZS FLEE ES 


g 


E15 


12-Jul-1984 15:04:10 
21-Jun-1984 06:36:17 


@-20000, XMIT.D.LIST+4 
@I0P . TABLE +12 


REG.ADR,RO 
16( RO), 22¢SP) 
04,22(SP) 





D 
@RCV.D.LIST,@IOP. TABLE +4 
@IOP . TABLE «6 

ENGTH, ai 






XBUF .L 


PC .SET.XDESCR.LIST 
OXMIT.0.LIST,@I0P. TABLE+10 
Q@IOP . TABLE +12 





XI. STATUS 


z 
Se 
om 


VAX-11 Bliss-16 V4.0-579 
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¢, TMP .LOCATION 
¢, TMP .LOCATION 


3 *, TMP .LOCATION 
; TMP .LOCATION,«¢ 


SEQ fs ay 


77 
oe 50) 


; Routine Size: 
; Maximum stack depth per invocation: 


004737 
104466 
006000 
103773 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 12 - NXM INTERRUPT TEST 


000000G 


419 words, 


010504’ 


16%: 


17$: 


18%: 
19$: 


SEREEGCB gpg g882 g220g222 


Routine Bese: ABSCODES 
3 words 


ris 


12-Jul-1964 13:04:10 
21-Jun-1984 06:36:17 


s * 

2] 

S 
eo ee Ge Ge 


4: 

rey 

* 

’ 

“~~ 
~d 
* 

"@ 
ww 
ee 


a 
% 3 


. TABLE +16 


os 

Se Lod 
Se 

os @ os oe 


Til2 TEST 12 - NAM INTERRUPT TEST 
PC,$Ti2 ‘ 
66 





VAX-11 Bliss-16 V4.0-579 P 
SPIDERSUSERS : (BERG. DEQNA JNQNAS.BLI;1 


*,$$TMP1 


$$TMP 
$$TMP1 


$$TMP2 


+, TMP .LOCATION 
+, TMP .LOCATION 


+, TMP .LOCATION 
TMP .LOCATION,« 


SP ,« 


SEQ 0161 i 
age 
(30) 


3177 


3180 


3181 
3182 


3183 


3184 


3186 


G13 


SEG 0162 
NQNA3 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 

vo1.0 TEST 12 - NXM INTERRUPT TEST 21-Jun-1984 08:36:17 SPIDERSUSERS:;( BERG, DENA JNGNAS Burs 30) 
000012 000207 RTS PC 

; Routine Size: 6 words, Routine Base: ABSCODES + 12212 


; Maximum stack depth per invocation: 2 words 


3 3191 1 


“+ oF GF GF GF GF GF Ge Ge Gt GF GF Ge OF GF GF GF GF Gs GF GF Ge GF Ge Gs @ Of oF os os 


See ee he ee be ee fe ee ee be ee Pe ee ee he ee ee he ee ee he Be Be he he Be Be ee Be Be ee Be 





His 
SEQ 0163 
CNQNAAO DEQGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 v4.0-579 age 80 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 21-Jun-1984 08:36:17  SPIDERSUSERS:(BERG.DEQNAJNQNAS.BLI;1 (31) 


@SBTTL ‘TEST 13 - MULTIPLE AND CHAINED PACKET TEST’ 


See 
TEST 13: MULTIPLE AND CHAINED PACKET TEST 


DESCRIPTION: 


This test verifies that the DEQNA cen transmit and receive multiple, 
linked and chained loopback packets. 


If the operator specifies loop on error, the program re-executes the 
code that detected the error until tC is entered. 


Hardware tested: 
Processing: 


BEGIN 
reset device 
select internal/extended os mode 
transmit simple loopbeck packet 
check for expected loopback stetus 
IF error 


THEN 


cell compare_packets 


transmit multiple, linked and chaind loopback packet 
check for expected loopback status 
IF error 
THEN 
print error message if not inhibited 
ENDIF 
cell compere_packets 


VMAVUVMNMMNUUUUUI UU UU JU dt tt Gt tt 


ee 


le-Jul-1984 13:04:10 


QNA FUNCTIONAL TEST 
21-Jun-1984 08:36:17 


CNQNAAO DE 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 
BGNTST; 


RBUF _LENGTH = 64; 


XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 


’ 
| LOOPBACK UNCHAINED PACKET, THEN CHECK IF IT WAS PROPERLY RECEIVED 
q 


RESET_DEQNA ( ); 


INCR INDEX FROM O TO 63 DO 
XMIT_BUFFER [{ . INDEX ] = . INDEX; 
SET_ RDESCR. LIST ( .XBUF_LENGTH, VE ); 
SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
SEND _EL PACKET ( ZERO ); 

COMPARE PACKETS ( ); 

ENDSUB; 

RESET_DEQNA ( ); 

CLR_BUFFERS ( Si2 ); 

INCR INDEX FROM O TO 383 DO 
XMIT_BUFFER [ .INDEX } = . INDEX; 


INCR INDEX FROM 0 TO 63 00 ; 

RCV_D_LIST { .INDEX, W_LEN }] = .RD13 [ . INDEX i; 
INDEX FROM O TO 31 

XMIT_D_LIST { .INDEX, W_LEN }] = .1D13 [ .INDEX }; 


XMIT_O_LIST { 7, WLLEN ) = VE; 
XMIT_D_LIST { 13, W_LEN ) = E; 


PuT_BIT [ om. ane Te LOOPBACK ]}; 
XMIT _RCV_P ( ); 
CHK_RIXI_STATUS ‘we JERO ); 
CHK_CSR_STATUS ( CSR_STATUS, CSR_MAS" ); 


XMIT_D_LIST { 7, 
XMIT_O_LIST [ 
XMIT_D_LIST [( 13, 


3, W_LEN 
-IOP_TABLE { XLO_ADR ] = XMIT_D_LIST + 24; 
-IOP_TABLE { XHI_ADR } = ZERO; 

ZERO 


CHK _RIXI_STATUS (¢ 
CHK_CSR_STATUS ( CSR_ STA TUS, CSR_MASK ); 


"CHECK IF RECEIVE BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 


e@ te +@ 
' > 


! 0'100220', 0° 100220’ 


! 0'100220’, 0'100220' 





SEQ aay 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNAS.BLI;1 


Page 


81 
(32) 


AMAA DADA HAHAAMNAAANAMNMA ADMIN AAADADVUVUUUNAARAROUNUUUUU 


J15 


SEQ 0165 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15:04:10 VAX-11 Bliss-16 V4.0-579 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG. DEQNA JNQNA3 .BLI;1 


INCR INDEX FROM O TO 53 DO 


AND .RCV_D_LIST { . INDEX, W_LEN } 
AND .RCV_D_LIST [ . INDEX, W_LEN } ‘ ‘ 
THEN 
BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 


PRINTB ( MSGSO, .RCV_O_LIST { .INDEX, W_LEN J], .RDI3 [{ .INDEX ], . INDEX ); 
ERRDF ( 1301, MSGOO, ERRORSREPORT ); 


See 
: CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 


INCR INDEX FROM O TO 23 DO 


IF .XMIT_D_LIST { .INDEX, W_LEN } NEQU .TD135 [ .INDEX ] 
AND .XMIT_D_LIST [ . X, W_LEN ) NEQU #0° 177777' 
AND .XMIT_D_LIST ({ .INDEX, W_LEN ] NEQU #0'020414' 

INDEX, W_LEN ] NEQU #0°004140' 


AND .XMIT_D_LIST [ 
THEN 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSGS9 ); 
PRINTB ( MSG49 ); 
PRINTB ( MSGSO, * XMIT_ D_LIST { .INDEX, W_LEN }), .7013 { .INDEX ], .INDEX ); 
ERRDF ( 1302, MSGOO, ~PARORSREPORT ); 


5 
INCR INDEX FROM O TO 5 DO 


BEGIN 
XMIT_D_LIST { .INDEX, W.LEN ) = .XMIT_O_LIST ({ . INDEX + 24, W_LEN }; 
— { . INDEX, W_LEN ) = .RCV_O_LIST [ INDEX + 54, W_CEN }; 
; 


CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); ! 0'140000°, 0' 000400" 
CHK-RCV_STATUS ( RFLG_STATUS, RWD1_STATUS ); ! 0°140000', 0°020000°' 


INCR INDEX FROM 0 TO 363 DO 
—- { .INDEX ] NEQU .RCV_BUFFER [ .INDEX ] 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTB ( MSGS9 ); 
PRINTB ( MSGS1 ); 
PRINTS ( MSGSO, .RCV_BUFFER [ .INDEX ), .XMIT_BUFFER [ .INDEX ], .INDEX ); 
-— € 1303, MSGOO, ERRORSREPORT ); 
$ 
ENDSUB; 


Page 


Be 
(32) 


CNQNAAO DEQNA FUNCTIONAL T 


EST 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 


ENDTST; 


$T13: 


2s: 


3$: 


4$: 
5$: 


6$: 


PgRaceagreseanrnags 


2 
3 


EEE ise tb att fs 


K15 


$713 TEST 15 - MULTIPLE AND CHAINED PACKET TEST 
R1, $SAVE2 ; 


06 , SP 
0100, RBUF .LENGTH 
#100,RO 


RO 

RO 

RO, XBUF .LENGTH 
oe 

RO, XMIT .BUFFERCRO) 


RO, 077 
1 


$ 
2 
XBUF .LENGTH, -(SP) 
60000 
PC,SET.RDESCR.LIST 
CSP) 


RO, XMIT .BUFFERCRO) 
RO, #577 
3$ 


RO 

RD13(RO),.RCV.D.LISTCRO) 
¢2,R0 

RO, 0176 

S$ 

RO 

TO13(RO), XMIT.DO.LISTCRO) 
#2,RO0 

RO, 076 

@-60000, XMIT.D.LIST+16 


#20000, XMIT.D.LIST+32 
REG. ADR ,RO 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


VAX-11 Bliss-16 V4.0-579 


SEQ Pano 
Page 


83 
SPIDERSUSERS : (BERG .DEQNA JNQNA3.BLI;1 (32) 


INDEX 
INDEX , #€ INDEX) 
INDEX 
INDEX, + 


INDEX 
INDEX, «C INDEX) 
INDEX 


INDEX, @ 


INDEX 
@C INDEX), eC INDEX) 


@, INDEX 


INDEX, * 


INDEX 
*C INDEX), «C INDEX) 
INDEX 


Lis 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 4 84 

TEST 13 - MULTIPLE AND CHAINED PACKET TEST 21-Jun-1984 06:36:17 SPIDERSUSERS : (BERG. DEQNA JNQNAS .PLI;1 (32) 
042760 001400 000016 BIC #1400, 16¢ + fe 
052760 001000 000016 BIS #1000, 16(RO) 
004737 0000006 JSR —s- PC, XMIT. AND. RCV. PACKET ; 3265 
005016 CLR (SP) ; 4 
004737 000000G JSR PC CHK .RIXI.STATUS 
012716 100220 MOV 0-77560, (SP ) ; 3267 
011646 MOV (SP), - (SP) 
004737 000000G JSR PC ,CHK.CSR.STATUS 
012737 100000 0000166 MOV @-100000, XMIT.0.LIST+16 ; 3269 
012737 100000 0000350G MOV #-100000, XMIT.D.LIST+30 ; 3270 
012737 100000 000032G MOV @-100000, XMIT.D.LIST+32 ; 3271 
012777 000030G 0000106 MOV «so @XMIT.D.LIST+30,@10P.TABLE+10—_; 3573 
005077 000012G CLR SIOP . TABLE +12 : 3274 
005016 CLR (SP) ; 3276 
004737 000000G JSR PC CHK .RIXI.STATUS 
012716 100220 MOV @-77560, (SP) ; 3277 
011646 MOV (SP), -CSP) 
004737 000000G JSR PC ,.CHK.CSR. STATUS 
005002 CLR R2 ; INDEX 3283 
010201 7$: MOV R2,R1 ; INDEX,« 3284 
006301 ASL Ri 
016100 000000G MOV RCV.O.LISTCR1),RO 

1 000000G CMP RO,RDISCR1) 
001453 BEQ 8$ 
7 177777 CMP RO,@-1 ; 3285 
001450 BEQ 8$ 
020027 020600 CMP RO, 220600 $ 3286 
001445 BEQ 8 
013700 MOV REG .ADR,RO $ 3289 
016066 000016 000006 MOV 16(RO),6C(SP) ; *, TP .LOCATION 
016637 000006 MOV 6(SP).CSR.WORD ; TMP .LOCATION,=« 
012716 000000G MOV omSG59, (SP) s 3290 
012746 000001 MOV #1,-C(SP) 
010600 MOV SP RO 3 SP. 
104414 TRAP 14 
012716 000000G MOV OMSG48 (SP) ; 3291 
012746 000001 MOV €1.-CSP) 
010600 MOV SP ,RO y SP.« 
104414 TRAP “4 
010216 MOV R2,.(SP) ; INDEX,« 3292 
016146 000000G MOV RD1I3(R1).- 
016146 900000G MOV RCV.D.LISTCR1), -C(SP) 
012746 000000G MOV “he 
012746 000004 MOV 04,-( 
010600 MOV SP, ; SP, 
104414 TRAP 14 
104455 TRAP 55 : 3293 
002425 -WORD 2425 
-WORD M™SGOO 

000000G .WORD ERRORSREPORT 
062706 000014 ADD 014,SP : 3288 
005202 8$: INC R2 ; INDEX 3283 
020227 000065 CMP R2,065 ; INDEX,* 


DEQNA FUNCTIONAL T 


CNQNAAO EST 
TEST 13 - MULTIPLE AND CHAINED PACKET TEST 


9$: 


000000G 
000000G 


177777 

020414 

004140 

000000G 

000016 000010 
000010 000000G 
000000G 

000001 


000000G 
000001 


000014 
10$: 


SEEPEEELE 


2 
5 


Son eaSPSSPEP SER eas EER g ESC eS SS 


M135 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


7$ 
R2 
~t R1 


R1 
XMIT.O.LISTCR1),RO 
om TO13(R1) 


R2,(SP) 
TO13(R1), -CSP) 


XMIT.D.LIST+60(R1),XMIT.O.LISTCRO) ; 
R2,R1 ; 


Ri 
ae NY aro i 
> 


SEQ 0168 
VAX-11 Bliss-16 V4.0-579 Page 85 
SPIDERSUSERS : (BERG . DEQNA JNQNA3 .BLI;1 (32) 
s INDEX 3300 
s INDEX, 3301 
; 3302 
; 3303 
; 3304 
: 3307 
3 +, TMP .LOCATION 
Pd TMP .LOCATION, « 
; 3308 
Fr SP ,* 
; 3309 
; SP,« 
; INDEX,« 3310 
. SP.* 
; 3311 
; 3306 
; INDEX 3300 
; INDEX, * 
: INDEX 3314 
; INDEX, 3316 
3 INDEX, * 
x,# 3317 

3314 
; INDEX,« 

3320 





Nis 


NQNA3 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10  VAX-11 Bliss-16 V4.0-579 ~ 
vo1.90 TEST 13 - MULTIPLE AND CHAINED PACKET TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG . DEQNA JNQNA3. BLI;1, oF 32) 
001002 004737 000000G JSR PC, CHK. XMIT. STATUS 
C01006 012716 140000 MOV = #-40000, (SP) 3321 
001012 012746 9020000 MOV #20000, -( SP) 
001016 004737 000000G JSR PC, CHK .RCV.STATUS 
001022 005001 CLR R1 ; INDEX 3323 
001024 126161 000000G 000000G 12$: CMPB XMIT.BUFFERCR1),RCV.BUFFERCR1) ; *#C INDEX), *C INDEX) 3324 
001032 001447 BEQ 13$ 
001034 013700 000000G MOV REG. ADR ,RO : 3327 
001040 016066 000016 900016 MOV 16(RO),16CSP) ; *,TMP.LOCATION 
001046 016637 000016 000000G MOV 16(SP),CSR.WORD ; TMP .LOCATION,+ 
001054 012716 0000006 MOV § @MSGS9,(SP) , 3328 
001060 012746 000001 MOV #1,-CSP) 
001064 010600 MOV SP,RO ; SP,« 
001066 104414 TRAP 14 
001070 012716 000000G MOV @MSG51.(SP) $ 3329 
001074 012746 000001 MOV #1,-CSP) 
001100 010600 MOV SP RO ; SP,« 
001102 104414 TRAP 14 
001104 010116 MOV R1,CSP) ; INDEX,« 3330 
001106 005046 CLR - 
001110 116116 000000G MOVB XMIT.BUFFERCR1), CSP) ; *C INDEX),« 
001114 005046 CLR -(SP) 
001116 116116 000CCOG MOVB RCV.BUFFER(R1), (SP) ; *C INDEX), 
001122 012746 070000G MOV #mMSGSO, -( SP) 
001126 012746 %00004 MOV 04,-C(SP) 
001132 010600 MOV SP,RO ; SP, 
001134 104414 TRAP 14 
001136 104455 TRAP 55 ; 3331 
001140 002427 -WORD 2427 
001142 .WORD MSGOO 
001144 000000G -WORD ERRORSREPORT 
001146 062706 000014 ADD #14,SP : 3326 
001152 0052C1 13$: INC R1 : INDEX 3323 
001154 020127 000577 CMP R1,@577 ; INDEX, 
001160 003721 BLE 12$ 
001162 062706 000010 ADD #10,SP ; 3252 
11 104467 TRAP 67 ; 3332 
001170 
001172 103002 BHIS 14% 
001174 000137 012412’ JMP 4$ 
001200 062706 000010 14%: ADD #10,SP : 3190 
001204 000207 RTS PC 
; Routine Size: 323 words, Routine Base: ABSCODES + 12226 
; Meximum stack depth per invocation: 19 words 
.SBTTL T13 TEST 13 - MULTIPLE AND CHAINED PACKET TEST 
000000 004737 012226’ T13:: 
000000 3333 


1$: JSR PC,$T13 : 
000004 104466 TRAP 66 





614 


Nree & CNOMAAO DEGMA FUNCTION“ TEST 12-Jul-1964 13:04:10 
vo1.0 TEST 135 - PRULTIPLE A CHAINED PACKET TEST 21-.4m-1984 08:36:17 
000006 006000 RoR RO 

000010 105775 8.0 is 

000012 000207 RTS PC 

; Routine Size: 6 words, Routine Bese: ABSCODES - 134354 


SEQ 0170 


VAX-11 Bliss-16 ¥4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNONAS .BL1;1 


67 
(32) 


> Oe Pe be he Fe be Fe ee he Oe be be Oe be be be be be be be ee he be Be he be be he he oe he he ee 


Ci4 


12-Jul-1984 15:04:10 


FUNCTIONAL TEST 
21-Jun-1984 06:36:17 


CNQNAAO DEGNA 
TEST 14 - OMA TIMING TEST 
SSBTTL ‘TEST 14 - OMA TIMING TEST’ 


See 
TEST 34: DMA TIMING TEST 
DESCRIPTION: 


This test veri 
Chained and Li 


~ 


NOTE: An answer to the following software quastion 
SYSTEM HAS BLOCK MODE MEMORY (L)? 
determines the value for ‘X'. 

Herdwere tested: Internal/Extended loopback 


- error summary (bit 14) 
Processing: 


BEGIN 
reset device 
select internal/extended loopbeck mode 
set the timeout timer to ‘'X’' msec 
transmit chained loopback packet 
start the timer 
IF timeout 
THEN 
ee error message if not inhibited 


check for expected loopback status 
IF error 
THEN 
print error message if not inhibited 
ENDIF 
cell compare packets 
END 


c ? 
VAX-11 Bliss-16 V4.0-579 4 ry. 
SPIDERSUSERS: (BERG.DEQNAJNQNAS.BLI;1 | (32) 


fies that the DMA transfer completes within ‘'X' msec. 
nked 1514 byte loopbeck packet is used to accomp] ish 
this test. If the operator specifies loop on error, the program 
re-executes the code that detected the error until tC is entered. 


Transmit stetus - lest descriptor in chain (bit 15) 
Receive stetus - lest descriptor in chain (bit 15) 


: 
' 
: 


PAA AAA AAUUAAUIADOOADMUUUUUULUUUYu tt es tt 


D1i4 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 
TEST 14 - OMA TIMING TEST 21-Jun-1984 08:36:17 


BGNTST; 
RBUF _LENGTH *  EGAL_LENGTH; 
XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 


INCR INDEX FROM O TO LEGAL_LENGTH - 1 DO 
XMIT_BUFFER [ .INDEX ] = . INDEX; 


BGNSUB ; 
RESET_DEQNA ( ); 
INCR INDEX FROM O TO 63 DO 
RCV_D_LIST { . INDEX, W_LEN }) = .RD13 [ .INDEX }; 
INDEX FROM'O TO 31 00 
XMIT_D_LIST { . INDEX, W_LEN ) = .TD13 ({ . INDEX }; 
.XMIT_O_LIST [{ 27, uw -LEN }; 
“RCV_O_CIST [ 51. W_LEN ); 
TEMP7 = .RCV_D_LIST [ 56, W_LEN }; 
XMIT_D_LIST { 27, W.LEN ) = -628; 
Rcv_O.CIST [{ Si, W_LEN ) = -625; 
RCV_D_LIST [ 56, W_LEN ) = RCV “BUFFER * LEGAL_LENGTH - 2; 


PUT_BIT ( CSR, LB. INX_LOOPBACK }; 
XMIT_AND_RCV_PACKET ( ); 


CHK _RIXI_STATUS (€ ONE ); 
IF .SWP_BLOCK_MEM EGLU ONE 
THEN 
TEMP4 = #60'105' 
ELSE 
TEMP4 = 4 « TIMES_LIMIT; 
IF .TEMP1 GTRU . TEMPS 
THEN 


= 


BEGIN 
CSR_WORD = GET_BIT (€ CSR_ALL ); 
PRINTB ( >: 
PRINTB (€ MSGS2 ); 
ERRDF ( 1401, MSGOO, ERRORSREPORT ); 
END; 
CHK_CSR_STATUS ( CSR_STATUS. CSR_MASK ); § 0°100220° , 0° 100220' 


XMIT_O_LIST { 27, WL.LEN ) = . TEMPS; 
RCV_O.LIST [ Si, W.LEN ] = .TEMP6; 
RCv_O.LIST [ S6, W.LEN ] = .TEMP7; 


"CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 


INCR INDEX FROM 0 TO 23 DO 
IF .XMIT_C_LIST { . INDEX, W.LEN ) NEQU .TD13 [ .INDEX ] 


SEG 017° 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA }NQNAS.BLI; 


Page 89 
1 (34) 
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c14 


SEQ 017 
CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10  VAX-11 Bliss-16 v4.0-579 ~ 
TEST 14 - DMA TIMING TEST 21-Jun-1984 08:36:17  SPIDERSUSERS:(BERG.DEQNAJNQNAS.BLI;1 (34) 


AND .XMIT_D_LIST { .INDEX, W_LEN ] NEQU #0'177777' 
THEN 
SR_WORD = Ee ld ( CSR_ALL ); 


)3 
PRINTB ( MSGSO, “een DO_LIST [ EX. W.LEN ), .7013 { . INDEX J], . INDEX ); 
ERRDF ( 1402, MSGOO, ERRORSREPOR 


See 
* CHECK IF RECEIVE BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 
é 


INCR INDEX FROM © TO S3 00 
IF .RCV_D_LIST { . INDEX, W_LEN ) NEQU .RD13 [{ . INDEX } 
AND .RCV_D_LIST [ PINOEX: W_LEN ) NEQU #0°177777° 


THEN 
BEGIN 
CSR_WORD = GET_BI 
PRINTS ( MSGS9 ); 
MSG48 ); 
PRINTS ( MSGSO, .RCV_D_LIST { .INDEX, W_LEN }), .RD13 [ .INDEX ], .INDEX ); 
ERRDF ( 1403, MSGOO, ERRORSREPORT ); 


T € CSR_ALL ); 


INCR INDEX FROM O TO 5 DO 
BEGIN 


TEMP1 = .INDEX + 24; 

TEMP2 = .INDEX + 54; 

XMIT_O_LIST { . INDEX, W.LEN ] = .XMIT_O_LIST { .TEMP1, W_LEN }; 
enicv-0.LIst { . INDEX, W_LEN } = .RCV_O_LIST [ .TEMP2, W_LEN }; 

° 


RBUF_LENGTH = 1514; 
CHK_XMIT_STATUS ( XFLG _STATUS, XWD12_STATUS ); ! 0°140000', 0° 000400" 
CHK_RCV_STATUS ( RFLG_STATUS, RWD1_STATUS ); ! 0'140000', 0°020000° 


oe See eee Pe ee 1 DO 
"<=" —_— X ] NEQU .RCV_BUFFER [ .INDEX } 


= GET_ BIT € CSR_ALi ); 
$ 
)s 


MSGS9 
€ MSGS1 

MSGSO, "RCV BUFFER [ aT oe }, .XMIT_BUFFER [ .INDEX }, .INDEX ); 
1404, MSGOO, ERRORSREPORT 





ENDTST; 


.SBTTL $714 TEST 14 - DMA TIMING TEST 


AQ DEQNA FUNCTIONAL TEST 


CNQNA 
TEST 14 - OMA TIMING TEST 


$714: 


BLE 


PEPE EEE st E is 


fos Be ol 
Landaa 
vin 


PEEP EE be EELS bhp 


TRAP 


géé 


F14 


12-Jul-1984 13:04:10 


21-Jun-1984 08:36:17 
R1, $SAVE2 
#10,SP 
02752, RBUF .LENGTH 
#2752,R0 
RO 
RO 
RO, XMIT .BUFFERCRO ) 
RO,@2751 


fur 
Eas 


— .DEQNA 

Sera ee eee OLESEN) 
RO, 0176 

3$ 


RO 
a oXMIT.O.LISTCRO) 
RO, 076 


XAIT. D.LIST +66, TEMPS 
RCV.0.LIST+146, TEMPG 
RCV .O.LIST+160, TEMP7 





-(SP) 
PC. CHK. RIXI. STATUS 
Sup @1 


VAX-11 Blies-16 V4.0-579 
SPIDERSUSERS : [(BERG.DEGNA JNQNA3.BLI;1 





INDEX 
INDEX, #«C INDEX) 
INDEX 


INDEX, 


INDEX, + 


INDEX 
*C INDEX), «C INDEX) 
«, INDEX 


INDEX, « 


¢, TMP LOCATION 
TMP .LOCATION, « 


SP.* 


SP, 


INDE 
*C INDEX), «( INDEX) 
INDEX 


SEQ Keneoy 


91 
att 34) 
3335 


DEQNA FUNCTIONAL TEST 


CNQNAACG 
TEST 14 - OMA TIMING TEST 


000000G 177777 
000000G 

000016 000006 
000006 000000G 


000000G 
000001 


000000G 
000001 


000014 


000000G 000000G 
000000G 177777 
000000G 


7$: 


9$: 


10%: 


Bee 


EEE EE 


ry 
% 


SOR GRR gEeHEEE GEES 


ASL 


TEMP7, “RCV.D.LIST+160 


R2 
R2,R1 


Ri 
Se eeerene ae eee 
ee taaaatietaial 


R2 
R2,R1 


Ri 

mena aa tian 
-:  gceemealtaa ala 
REG.ADR,RO 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


3(R1),-CSP) 
XMIT.O.LISTCR1), -CSP) 
@MSGS0, -CSP) 
o4, -(SP) 

RO 





7 
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SPIDER SUSERS : (BERG. DEQNA JNQNA3.BLI;1 (34) 


° 3418 
‘ 3414 
; 3421 
$ 3423 
5 3424 
$ 3425 
s INDEX 3430 
s INDEX,=« 3431 
$ 3432 
H 3435 
; *, TMP .LOCATION 

3 TMP .LOCATION, « 

; 3436 
; SP .* 

: 3437 
. SP .« 

3 INDEX,« 3438 
; SP ,.« 

3 3439 
F 5436 
; INDEX 3430 
; INDEX, + 

; INDEX 3445 
. INDEX, @ 3446 
; 3447 
: 3450 





H1i4 


NQNA3 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-16 3 13:04:10 VAX-11 Bliss-16 V4.0-579 ~ -% 93 
v01.0 TEST 14 - OMA TIMING TEST 21-Jun-1964 08:36:17 SP1_LERSUSERS : (BERG. DEQNA JNQNAS.BLI;1 (34) 
000600 016066 000016 000010 MOV 16(RO),10(SP) ; *,TMP.LOCATION 
000606 016637 000010 000000G MOV 10(SP),CSR.WORD ; TMP.LOCATION, « 
000614 012716 000000G MOV @MSG59, (SP) ; 3451 
000620 012746 000001 #1, -(SP) 
000624 010600 MOV SP ,RO ; SP,« 
000626 104414 TRAP 14 
000630 012716 000000G MOV @mSG48 ,( SP) ; 3452 
000634 012746 000001 MOV 61,-(SP) 
000640 010600 MOV SP RO ; SP,« 
000642 104414 TRAP 14 
000644 010216 MOV R2,(SP) ; INDEX,« 3453 
000646 016146 000000G MOV RD13(R1),-C(SP) 
000652 016146 000000G MOV RCV.D.LISTCR1), -C(SP) 
000656 012746 000000G MOV @MSG50, -( SP) 
000662 012746 000004 MOV 04,-(SP) 

010600 MOV SP RO 3; SP,* 
000670 104414 TRAP 14 
000672 104455 TRAP 55 ; 3454 
000674 002573 -WORD 2573 
000676 000000G . WORD 
000700 000000G .WORD ERRORSREPORT 
000702 062706 000014 ADD 014, 3449 
000706 11$: INC ; INDEX 3445 
000710 000065 CMP R2,065 3; INDEX,s 
000714 003715 BLE o$ 
000716 CLR ; INDEX 3457 
000720 010237 12$: MOV R2, TEMP1 3; INDEX,+« 3459 
000724 062737 000030 000000G ADD 030, TEMP1 
000732 010237 000000G MOV R2, TEMP2 ; INDEX,« 3460 
000736 062737 000066 000000G ADD 066, TEMP2 
000744 010200 MOV R2,RO ; INDEX,« 3461 
000746 ASL RO 
000750 013701 000000G MOV TEMP1,R1 
000754 301 ASL R 
000756 016160 000000G 000000G MOV XMIT.D.LISTC(R1),XMIT.D.LISTCRO) 
000764 013701 000000G MOV TEMP2 Ri ; 3462 
000770 301 ASL Ri 
000772 016160 000000G 000000G MOV RCV.D.LIST(R1), RCV.D.LISTCRO) 
001000 INC R2 ; INDEX 3457 
001002 7 00000% cMP R2,.05 ; INDEX,« 
001006 003744 BLE 12$ 
001010 012737 002752 000000G MOV 62752, RBUF .LENGTH : 3465 
001016 012716 140000 MOV @-40000, (SP) : 3466 
001022 012746 MOV »- CSP) 
001026 004737 000000G JSR PC, CHK. XMIT. STATUS 
001032 012716 140000 MOV @-40000, (SP) : 3467 
001036 012746 MOV #20000, -( SP) 
001042 004737 000000G JSR PC, CHK. RCV.STATUS 
001046 005001 CLR Ri ; INDEX 3469 
001050 126161 000000G 000000G 13%: CMPB XMIT.BUFFERCR1L),.RCV.BUFFER(R1) ; #( INDEX), (INDEX) 3470 
001056 001447 BEQ 14$ 
001060 013700 000000G MOV REG.ADR,RO ; 3473 
001064 016066 000016 000016 MOV 16(RO),16(SP) 3; #,TMP.LOCATION 





: Routine Size: 


CNQNAAO DEQGNA FUNCTIONAL TEST 
TEST 14 - OMA TIMING TEST 


000016 000000G 
000000G 
000001 


000000G 
000001 


143: 


013520' 


000010 15%: 


333 words, 


; Meximam stack depth per invocation: 19 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 
; Maximum stack depth per invocetion: 


004737 
104466 
006000 
103773 
000207 


3 3482 #1 


013450’ 


Routine Base: 
2 words 


6 words, 


EEE EEEEPEEEr Eee 


+ 
Dw 
B33%% 


Bateser exe 


RTS 


Routine Base: ABSCODES 
words 


114 


12-Jul-1984 15:04:10 
21-Jun-1984 08:36:17 


16(SP),CSR.WORD 
@MSGS9, (SP) 
#1,-CSP) 

SP ,RO 


14 
@MSG51, (CSP) 
#1, -(SP) 


14 
R1,(SP) 


-(SP) 

— 
RCV.BUFFER(R1),(SP) 
@MsGSO ) 

e4, -( SP 


R 
R1,¢2751 
13% 
#10,SP 
67 

RO 

15% 

es 
#10,SP 
PC 


¢ 13450 


T14 TEST 14 - DMA TIMING TEST 


PC,$T14 
66 


RO 
i$ 
PC 


ABSCODE$ + 14702 


SEQ 9177 


VAX-11 Bliss-16 V4.0-579 
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TMP .LOCATION, « 
SP, 

SP, 

INDEX, ¢ 


*( INDEX),« 
#C INDEX),« 


SP, 


INDEX 
INDEX, « 


ege 94 
(34) 


3474 


3475 


3476 


3477 
3472 
3469 
3384 
3478 


3335 


3479 


Pe ee ee ee ee et ee ee ee ee ee ee be be be ee be be be he ee be pe be pe pe 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15; 
TEST 15 - LONG PACKET TEST 21-Jun-1984 068: 


SSBTTL ‘TEST 15 - LONG PACKET TEST’ 
ae 


:10 VAX-11 Blies-16 V4.0-579 
:17 SPIDERSUSERS : [BERG .DEGNAJNQNAS OLI;1 


TEST 15: LONG PACKET TEST 


DESCRIPTION: 


This test verifies that DEGNA can detect long packets ( 1600 bytes 
or more with the CRC ) when transmitted in internal/extended 
loopback mode. If the operatcr specifies loop on error, the 
progrem re-executes the code that detected the error until fC is 
entered. 


Hardware tested: RCV Status - error summary (long packet-bit 14) 
Processing: 


BEGIN 
reset device 
select internal/extended loopback mode 
transmit loopbeck packet (legal packet length) 
check for expected loopback status 
IF error 
THEN 
so error message if not inhibited 


ets 
transmit loopback packet ( packet *ength > legal max. ) 
IF Error Summary bit ( Receice Stat.s Word 1, bit 14): 1 
ean” ( receive pacxet length is trurcai:d ) 
print error message if not inhibited 
~~ 


SEQ 0178 ” 
age 
(35) 


Gt UT 0 9 dt dd 7 7 Gt tt tt tt 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1964 15:04:10 
TEST 15 - LONG PACKET TEST 21-Jun-1984 08:56:17 
BGNTST; 


ob 
+ 


LOOPBACK 1534 BYTE PACKET AND THEN CHECK IF PROPERLY RECEIVED. 
THIS IS THE LONGEST PACKET LENGTH WHICH DOESN'T SE 
THE RECEIVE STATUS WORD 1 ( BIT 14 ). 


RBUF _LENGTH = 1554; 
XBUF _LENGTH = - ¢ "RBUF _ LENGTH ft -1 ); 


3 
RESET_DEQNA ( ); 
SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
SET_XDESCR_LIST ( .XBUF “LENGTH, VE ); 
_ELOOP _PACKET ( ZERO ): 
COMPARE _PACKETS ( ); 
ENDSUB; 


See 


RBUF _LENGTH = 1536; 
XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 


BGNSUB; 
RESET_DEQNA ( ); 


$715: MOV $2776, RBUF . 


776 MOV 62776,R0 

ASR RO 

NEG RO 
000000G MOV RO, XBUF .LENGTH 

1$: TRAP 2 

000000G JSR PC RESET .DEQNA 
000000G MOV XBUF .LENGTH, -(SP) 
120000 MOV @-60000, -( SP) 
000000G JSR PC,SET.ROESCR.LIST 
000000G MOV XBUF .LENGTH, (SP) 
120000 MOV #-60000, -( SP) 
000000G JSR PC ,SET.XDESCR.LIST 

CLR (SP) 


T ‘LONGP’ BIT I 


-SBTTL $1715 TEST 15 - LONG PACKET TEST 
LENGTH 


SEQ 0179 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA )NQNA3.BLI;1 


Page 


96 
(36) 


; Routine Size: 
; Maximum steck 


000000 
000000 
000004 
000006 
000010 
000012 


; Routine Size: 
; Maximum stack 


: 3554 
3 3555 1 


004 737 


104466 
006000 


103773 
000207 


1 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 15 - LONG PACKET TEST 


70 words, 
depth per invocation: 4 


014716’ 


6 words, Routine Base: 
depth per invocation: 


Routine Base: ABSCODES 
words 


JSR 
TRAP 


ROR 
BLO 
RTS 


Lid4 


12-Jul-1984 13:04;10 
21-Jun-1984 06:56:17 


PC, SEND.ELOOP. PACKET 
PC. COMPARE . PACKETS 


67 

RO 

1$ 

#3000,,RBUF .LENGTH 
03000, RO 

RO 

RO 

y a XBUF ° LENGTH 


-60000, a ) 
T. XDESCR.LIST 


SET. 

(SP) 

SEND .ELOOP . PACKET 
SP 


Heousoore 


* 

~ 
ys) 
be 
oa 


TiS TEST 15 - LONG PACKET TEST 


PC ,.$TiS 
66 


RO 
1$ 
PC 


ABSCODE$ + 15152 





VAX-11 Bliss-16 V4.0-579 
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3551 


CNQNAAO DEGNA FUNCTIONAL TEST 
TEST 1€ - ODD PACKET TEST 


SSBTTL ‘TEST 16 - ODD PACKET TEST’ 


ol al el eel al eh el ol eh ol ol el el ed el dl el ed ed ed ed od od ed ed ed ed od ea OL OL OL Oa Lee ee Ter ee 


M14 


TEST 16: ODD PACKET TEST 


DESCRIPTION: 
This test verifies that DEQNA can transmit and receive odd 


packets and packets starting and/or ending on odd addresses 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


SEQ 0181 
VAX-11 Bliss-16 V4.0-579 Page 98 
SPIDERSUSERS:(BERG.DEQNAJNQNAS.BLI;1 — (37) 


edgresses. Chained 


and unchained descriptor lists ere used to verify this. If the operetor 
ee loop on error, the program re-executes the code that detected 


the error until tC is entered. 


Hardware tested: CSR register - XMIT List Invalid (b 
- RCV List Invalid (b 
Transmit Descriptor bits 
- XMIT buffer ends on 
- XMIT buffer ends on 


Set of addresses and packet lengths: 


PACKET ADDRESS PACKET LENGTH 
ose “ and end = 
in even 
a odd 
Processing: 
BEGIN 


reset device 


t 4) 
t 5) 


odd byte 
even byte 


REPEAT for internal and internal/extended loopback mode 
address 


REPEAT for each packet 
check for expected loopbeck status 
IF error 
THEN : 
print error message if not inhibited 
ENDIF 
cell pppeare pees 


ENDREPEAT 
END 


and length from set 


< 

26 

ray 
iM 


SESEEEEESEESEEESEEESS ° 


oF OF GF GF Ge GF GF BF GF GH GF SH Ge Ge OF GF GF BF OF GF GF GF GF SF GF GF SF SF St GH Se Ge SF OF GF GF BF Gs OF GF OF Os OF Os Os os OF Os Se os Os OF oe 
AAKOMMMIUVUUIUUUUUUU UU UU dd GG GW GC Ut tt Gd a tt at 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 16 - ODD PACKET TEST 


N14 


12-Jul-1984 13:04:10 
21-Jun-1984 8:36:17 


BGNTST; 


tee 


RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM 


RESET_DEGQNA ( ) 
PREP _F 


SETUP ( ); 
NCR INDEX1 FROM 1 TO 1 


I 4 00 
WRT_STATION_ADR ( Y TNDEX! . PHA_INDEX ); 


BGNSUB ; , 
XMIT_SETUP_PACKET € P_MODE ); 
ENDSUB; 


RBUF _LENGTH = 6 
XBUF “LENGTH = - ( -RBUF_LENGTH t -1 ); 


°— +e te se 
> 


" LOOPBACK A PACKET, THEN CHECK 1F LOOPBACK PACKET WAS PROPERLY 
RECEIVED 


CLR_BUFFERS ( 32 ); 


2 
INCR INDEX FROM O TO 43 DO 
og TTD D_LIST f -INDEX. WLEN } = .TD16 { . INDEX ); 
RDESCR_LIST ( .XBUF_LENGTH, VE ); 
BUT “BIT { CSR, "% INT_LOOPBACK }; 


XMIT_AND_RCV_PACKET ( ); 
CHK_RIXI_STATUS ( ONE ); 
)3 
“TOP_TABLE [ CSR} = ZERO; 
CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK ); ! 0°100220', 0'100220' 


ee t@ t@ 
' < 


” CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED 


INCR INDEX FROM O TO 17 DO 
IF .¥MIT_O_LIST { . INDEX, W_LEN ) NEQU .1D16 [{ .INDEX ] 
ae { . INDEX, W_LEN ] NEQU #0'177777' 


BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTS ( MSGS9 ); 


SEQ 0182 


VAX-11 Bliss-16 V4,0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNA3 .BLI;1 


age 99 
(38) 


615 


ee 
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. INDEX ]. . INDEX ); 


CNQGNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 
TEST 16 - ODD PACKET TEST 21-Jun-1984 08:36:17 
If . Sg a ee . INDEX, W_LEN }] NEGU .TD16 [ .INDEX } 
AND _D_LIST { . INDEX, W_LEN } NEQU 60° 177777' 
IN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTS ( MSGS9 ); 
PRINTS ( MSG49 ); 
PRINTS ( MSGSO, .XMIT_O_LIST { .INDEX, W_LEN }, .TD16 [ 
ERRDF ( 1604, MSGOO, “ERRORSREPORT F 
END; 
INCR INDEX FROM O TO 5 DO 
XMIT_D_LIST { . INDEX, W_LEN } = .XMIT_D_LIST ({ .INDEX + 36, W_LEN ]); 


CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); 
CHK_RCV_STATUS 


- INDEX FROM O TO 5 


00 
.XMIT_BUFFER [ .INDEX ] NEQU .RCV_BUFFER [ .INDEX ] 


* GET_BIT ( CSR_ALL ); 
59 ); 





! 0° 140000‘, 0'000400' 
( RFLG_STATUS, RWDI_STATUS ); ! 0°140000', 0'020000' 


PRINTB ( MSGSO, .RCV_BUFFER [ a. ]), .XMIT_BUFFER [ .INDEX ], .INDEX ); 
ERRDF ( 1605, MSGOO, ERRORSREPORT ) 3 

END; 

INCR INDEX FROM 6 TO 9 DO 
IF .RCV_BUFFER [ . INDEX ] NEQU ZERO 
THEN 

BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTS ( MSGS5S9 ); 
PRINTS (€ MSG5S1 ); 
PRINTS ( MSGSO, .RCV_BUFFER [ ts aad }, .XMIT_BUFFER [ . INDEX ), .INDEX ); 
ERROF ( 1606, MSGOO, ERRORSREPORT 

END; 

INCR INDEX FROM 0 10 5 DO 
—_ { . INDEX + 10 ) NEQU .TARGET_ADR [ .INDEX + 114 ] 

BEGIN 
CSR_WORD = GET_BIT ( CSR_ALL ); 
PRINTS ( MSGS9 ); 
PRINTB ( MSG51 ); 
PRINTB € MSGSO, .RCV_BUFFER [ .INDEX ], .XMIT_BUFFER [ .INDEX ], .INDEX ); 

“ee C 1607, MSGOO, ERRORSREPORT ); 
: 


ENDTST; 


SE 00184 
SPIDERSUSERS : [BERG . DEQNA JNQNAS .BLI; 1 


.. 
J 


(38) 





SEQ 0 
110 VAX-11 Bliss-16 v4.0-579 many 


DEQNA FUNCTIONAL TEST 12-Jul-1984 13: 102 
: SPIDERSUSERS: (BERG.OEQNAJNQNAS.BLI;1 (38) 


CNQNAAO 
TEST 16 - ODD PACKET TEST 21-Jun-1984 08 


-SBTTL $T16 TEST 16 - ODD PACKET TEST 


$T16é: JSR R1, $SAVE2 ; 3553 
000014 SUB 214,SP 
000000G JSR PC,RESET.DEQNA ; 36.06 
000000G JSR PC, PREP .FOR. SETUP ; 3607 
000001 MOV 01.R1 3; @, INDEX1 3608 
1$: MOV R1,-CSP) ; INDEX1,« 3609 
000023 MOV €23,-(SP) 
JSR PC,WRT.STATION. ADR 
CMP (SP)+,(SP)-« 
INC Ri ; INDEX1 3608 
000016 CMP R1,016 ; INDEX1,¢ 
BLE 1$ 
2s: TRAP 2 ; 3609 
000202 MOV 202, -(SP) ; 3612 
000000G JSR PC, XMIT. SETUP .PACKET 
-~_ a” 
$ 3612 
ROR RO 
BLO 23 
000006 000000G MOV @6,.RBUF .LENGTH : 3615 
000006 MOV 26 ,RO ; 3616 
ASR RO 
NEG RO 
000000G MOV RO, XBUF .LENGTH 
000040 MOV 040, -(SP) : 3623 
000000G JSR PC, CLR. BUFFERS 
000000G JSR PC,CLR.DESCR F 3624 
CLR RO ; INDEX 3625 
000000G 3$: MOVB RO, XMIT.BUFFERCRO) ; INDEX, #€ INDEX) 3626 
INC RO ; INDEX 3625 
000005 cmp RO, 05 ; INDEX,« 
BLE 3$ 
4%: TRAP 2 : 3626 
CLR RO ; INDEX 3629 
000000G 000000G S$: MOV TD16(RO), XMIT.D.LISTCRO) ; #C INDEX), *( INDEX) 3630 
000002 ADD 62,RO ; *#, INDEX 3629 
000126 ~ RO, 0126 : INDEX. # 
000000G MOV XBUF .LENGTH, (SP) : 3631 
120000 MOV @-60000, -( SP) 
0000006 JSR PC, SET. RDESCR.LIST 
000000G MOV REG. ADR ,RO j 3632 
001400 000016 BIC €1400, 16(RO) 
000000G JSR PC, XMIT.AND.RCV. PACKET : 3634 
000001 MOV #1,(SP) ; 3635 
0000006 JSR PC, CHK .RIXI.STATUS 
000001 0000166 MOV 01, @I0P. TABLE +16 : 3636 
CLR (SP) ; 3637 


000000G JSR PC,.CHK .RIXI.STATUS 
000016G CLR IOP. TABLE +16 ; 3638 


012716 


CNQ@NAAO DEQNA FUNCTIONAL TEST 


TEST 16 - ODD PACKET TEST 
100220 
000000G 
6%: 
000000G 000000G 
000000G 177777 
000000G 
000016 000006 
000006 000000G 
070000G 
€00001 


000000G 
000001 


000000G 
000000G 
000000G 


000000G 0000006 9$: 


PEE EEE BE LE TE if 


AEE EE 


GoaQenSh QRERERECR GHB gg gEEEEEEE 


E15 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


@-77560,(SP) 

CSP), -(SP) 

PC ,.CHK.CSR. STATUS 

Re 

R2,R1 

R1 

ee ern he OENS 2 


yeh 


R1),-(SP) 


re 
“ee 
$S- 

—— 
we 


RO 
ah aaacaaael +44(RO), XMIT.O.LISTCRI J 


-(SP) 
PC,CHK RCV. STATUS 


1 
XMIT .BUFFERCR1), RCV. BUFFERCRI ) 





SEQ 0186 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNUNAS.BLI;1 


: INDEX 
3; INDEX,« 


$ 

; *, TMP .LOCATION 
; TMP .LOCATION,« 
; 


3 
: INDEX 
INDEX, * 


INDEX 
3 INDEX, ¢ 


s INDEX,« 


é 
; INDEX, * 


3; INDEX 
: #C INDEX), «C INDEX) 


Page 103 


(38) 
3640 


3654 


3655 


3650 
3646 


000000G 
000016 000014 
000014 
000000G 


000001 


000000G 
000001 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 16 - ODD PACKET TEST 


10$: 


11%: 


12$: 


15%: 
14%: 


TRAP 


z 


INC 








SOURRazneneEE BC IABi gs 


Fis 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


WET .BUFFER(RL),(SP) 
RCV .BUFFER(R1),(SP) 
@MSGSO, -(SP) 


RO 
RO, XBUF .LENGTH 
ee ee 


RO 
TO16( RO), XMIT.D.LISTCRO) 
@2,R0 





VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : (BERG . DEQNA )NQNAS .BLI;1 


¢, TMP .LOCATION 
TMP .LOCATION, « 


SP ,¢ 


SP ,¢ 
INDEX, « 

eC INDEX),« 
*C INDEX), +¢ 


SP, 


INDEX 
INDEX, 


INDEX 

INDEX, #C INDEX) 

INDEX 

INDEX, 

INDEX 

@( INDEX), «C INDEX) 
¢, INDEX 

INDEX. * 


SEG 1. 
age 
(38) 


3669 


3671 


3672 


3673 


012737 
012737 





DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 16 - OOD PACKET TEST 
100000 000046G 

000062G 


15%: 
000000G 177777 
000000G 
000016 000012 
000012 000000G 
000001 


000000G 
000001 


16%: 


178: 


ee 





Gis 


12-Jul-1964 13:04:10 
21-Jun-1984 06:36:17 


@-100000, XMIT.DO.LIST +46 
T .0.LIST+62 


) 
PC, XMIT.AND.RCV. PACKET 


(SP) 
PC CHK .RIXI.STATUS 
@-77560,( 


020000, XMIT.0.LIST+62 

~ 

id -D.LISTCR1), TO16(R1) 
XMIT.O.LISTCR1), 0-1 

i6$ 


R2,(SP) 
TO16(R1). -CSP) 


04, -(SP) 
RO 


VAX-11 Bliss-16 V4.0-579 P 
SPIDER SUSERS : [BERG . DEQNA JNGNAS.BLI;1 


INDE X 
INDEX, © 


s. TMP -LOCATION 
TMP .LOCATION, 


| 


SEQ 0188 
age 105 
(38) 


3688 
3689 
3691 


104414 
012716 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 16 - OOD PACKET TEST 
000110G 000000G 

000005 

140000 

000400 


000000G 
140000 


000000G 000000G 18%: 


mease 


Ai et SS 


His 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


VAX-11 Blies-16 v4.0-579 





SEQ te 


06 
SPICER SUSERS : [BERG . DEQNA JNQNAS .BLI;1 fealty 


RO 
XMIT.O.LIST+110CRO), XMIT.DO.LISTCRI) ; 
Re INDE xX 


-( SP) 
PC.CHK RCV. STATUS 


HRIT .BUFFERCRL),RCV..BUFFERCRL) 


oe 
5 


) 
T.BUFFERCR1), CSP) 


‘Be 
gage 
“$ 


: 
: 


64,- SP 


& 
Bn 
e 
+ 


14 
OMSG51.(SP> 


INDEX, ¢ 


INDEX 
#( INDEX), oC INDEX) 


¢, TMP .LOCATION 
TMP .LOCATION,« 


SP ,¢ 


SP,« 
INDEX, 

*C INDEX),¢ 
*C INDEX),« 


SP, 


INDEX 
INDEX, ¢ 


¢, INDEX 
eC INDEX) 


e, TMP .LOCATION 
TMP .LOCATION, « 


SP ,¢ 


3717 
3720 
3721 
3724 
3725 
3728 


3729 


3730 


3731 


3732 


3727 
3724 


3735 
3736 
3739 


3740 


3741 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
TEST 16 - ODD PACKET TEST 
000001 


23%: 


‘eh 


12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


VAX-11 Bliss-16 V4.0-579 


SPIDER SUSERS : (BERG . DEQNA )NQNAS .BLI;1 


; SP, 

; INDEX,«¢ 

3; *CINDEX),« 
3; *C INDEX),« 


; SP, 


INDEX 
. INDEX * 


al ; INDEX 
RCV .BUFFER+12(R1), TARGET. ADR+162(R1) ; 


23% 
REG. ADR ,.RO 
16(RO),24(SP ) 


1a 

R1,(¢SP) 

-(SP) 
alcatel 
RCV. .BUFFERCR1), (SP) 
@MSGSO, -( SP) 


3 of INDEX), 0 INDEX ) 


¢, TMP .LOCATION 
TMP .LOCATION, « 


; SP, 


; SP,« 

; INDEX, 

; *CINDEX),« 
; *CINDEX),« 


; SP, 


} INDEX, # 


SEQ tse 
Page 107 
(38) 


3742 


3743 


3738 
3735 


3746 
3747 
3750 


3751 


3752 


3753 


3754 


3749 
3746 


3682 


J15 


12-Jul-1984 13:04:10 


NQNA CNQNAAO DEQGNA FUNCTIONAL TEST 

ve 0 TEST 16 - ODD PACKET TEST 21-Jun-1984 08:36:17 
7 7 TRAP 67 

001776 10446 nan .: 

002002 103002 BHIS 24s 

002004 000137 016114’ JMP 13% 

002010 062706 000016 24%: ADD #16,SP 

002014 000207 RTS 

; Routine Size: 519 words, Routine Base: ABSCODES + 15146 


; Maximum stack depth per invocation: 22 words 


-SBTTL 116 TEST 16 - ODD PACKET TEST 


000000 004737 015146’ T16:: 

000000 1%: JSR PC,$T16 
000004 104466 TRAP 66 
000006 006000 ROR RO 
000010 103773 BLO i$ 
000012 000207 RTS PC 

; Routine Size: 6 words, Routine Base: ABSCODES + 17164 
; Maximum stack depth per invocation: 2 words 


: 3759 1 


SEO 019 
VAX-11 Blies-16 V4.0-579 Pees 108 
SPIDERSUSERS : [BERG .DEQNA JNQNA3.BLI;1 (38) 
$ 3755 
3 3553 
: 3756 





K15 


NQNAS CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 eee ane 
v01.0 TEST 17 - STATION ADDRESS TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG . DEQNA JNQNA3.BLI;1 (39) 
; 3760 1 *@SBTTL ‘TEST 17 - STATION ADDRESS TEST’ 

; 3761 1 See 

: 3762 1 : 

; 3763 1 : TEST 17: STATION ADDRESS TEST 

3 3764 1 : 

: cone : : DESCRIPTION: 

: 66 : 

; 3767 1 : This test verifies that DEQNA accepts only packets with legitimate 
; 3768 1 : ‘multicast’ and ‘non-multicast' addresses and discards those with 
; Be os : illegitimate ‘multicast’ and ‘non-multicast’ addresses. 

; . 

. ie 2 : Station Address RAM is loaded with a set of Target Addresses and 
: 3772 1 H Mode bits. Terget Addresses in and out of the set are used to 

; 3773 1 : loopback packets. If the operator specifies loop on error, the 

; 3774 1 : program re-executes the code that detected the error until fC is 
; 3775 1 H entered. 

. oe fs : 

: tk : : Herdware tested: Address Filter Circuitry 

; . 

: ht : : Set of ‘multicast’ addresses in HEXADECIMAL: 

; ° 

; 37861 1 : 01-00-00-00-00-00 

5s eee & 8 AB -AA-AA-AA-AA-AA 

5 eae § : 55 -55-55-55-55-55 

; 3784 1 : FF -FF -FF -FF -FF -FF 

s Svs i H Walking 1 

: 3786 1 8 

s sear & : Processing: 

s 3788 1 8 

; 3789 1 : BEGIN 

$ 3790 1 : reset device 

s Gra & 8 select internal loopback mode 

; 3792 1 : set mode to Setup 

3 3793 1 : lead Stetion Address RAM with ‘multicast’ eddresses 

; 3794 1 : REPEAT for each complemented and uncomplemented ‘multicast’ 
$ 3795 1 : eddress in the set 

3 3796 1 : load address 

3 3797 1 : disable receiver 

$ 798 #1 $ transmit loopback packet 

; 3799 1 : enable receiver 

s 3800 1 : check for expected loopback stetus 

3 3601 1 : If error 

| Bb so 1 not ianibites 

; . print error messege if mot innidi 

$ 3804 1 : IF 

3 3605 1 : cell compsre_packets 

; 3806 : : ENDREPEAT 

; g 

; 1 : 


VUULS HS HaaWWWWEDADHSAUUUSHaADS &PWWUWWWWUWWWUY WW 


Lao 


SEQ 0193 


12-Jul-1984 15:04:10 VAX-11 Bliss-16 V4.0-579 


QNA FUNCTIONAL TEST 
- 21-Jun-1984 06:36:17 


CNQNAAO 
TEST 17 - STATION ADDRESS TEST 
BGNTST; 


See 

: RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM TO ALL MULTICAST 
t MODE. 

a 


-SETUP ( ); 
INCR INDEX1 FROM 6 TO 19 DO 
WRT_STATION_ADR ( .INDEX1 - 5, .INDEX1 ); 


BGNSUB ; 
eal tae ( N_MODE ); 
3 


** 


NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 


RBUF _LENGTH = 6; 
XBUF _ LENGTH = - ( -RBUF _LENGTH ft -1 ); 


= Eee FROM 6 TO 19 DO 
WRT_STATION_ADR ( ZERO, .INDEX1 ); 


BGNSUB ; 
XMIT_ILOOP_PACKET ( ZERO ); 
3 


INCR INDEX2 FROM O TO 5 00 


BEGIN 
XMIT BUFFER { .INDEX2 } = ( -.XMIT.BUFFER [ .INDEX2 )) - 1 
TARGET ADR { .iNDEX2 ) = .XMIT_BUFFER [{ .INDEX2 }; 


BGNSUB ; 
XMIT_ILOOP_PACKET € ONE ); 
3 
END; 


TEMP4 = 14; 
INCR_INDEXS FROM O TO 3 DO 


IN 
IF .INDEXS EQLU 3 
THEN 


TEMP4 = 6; 
RESET_DEQNA ( ); 
PREP _FOR_ SETUP ( ); 
INCR INDEX4 FROM 1 TO . TEMP4 DO 


BEGIN 
WALKING_BIT ( ZERO, .INDEX4 + ( .INDEXS « 14) - 1, 5 )3 


P 
SPIDERSUSERS : [BERG . DEQNA JNQNA3.BLI;1 99° 40) 


10 


rm 





ET Et, TTT, EE LT 


MiSs 


NQNAS CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1964 13:04:10 VAX-11 Bliss-16 V4.0-579 unre eas 
v01.0 TEST 17 - STATION ADDRESS TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG. DEQNA JNQNA3.BLI;1 (40) 
; 3862 5 WRT_STATION_ADR ( .INDEX4, ZERO ); 
: 3863 4 3 
: 3864 4 
; 3865 6 BGNSUB ; 
; 3866 6 XMIT_SETUP_PACKET ( N_MODE ); 
; 3867 4 NOSUB ; 
; 3868 4 
; 3869 4 RBUF_LENGTH = 6; 
; 3870 ‘ XBUF_LENGTH = - ( .RBUF_LENGTH ft -1 ); 
; 71 
; 3872 4 INCR INDEX4 FROM 1 TO .TEMP4 DO 
; 3873 5 BEGIN 
; 3874 5 WALKING.BIT ( ZERO, .INDEX4 + ( .INDEX3 * 14 ) - 1, 5S Dz 
; 3875 5 WRT_STATION_ADR ( ZERO, ZERO ); 
; 3876 5S 
; 3877 7 BGNSUB ; 
; 3878 7 XMIT_ILOOP_PACKET ( ZERC ); 
; 3879 5S ENDSUB; 
; 3880 4 3 
3 3881 4 
; 3882 4 INCR INDEX2 FROM O TO 5S DO 
; 3883 5S BEGIN 
; 3884 5 XMIT_BUFFER [ .INDEX2 } = ( -.XMIT_BUFFER [ .INDEX2 ] ) - 1; 
; 3885 5 TARGET_ADR { .INDEX2 } = .XMIT_BUFFER [ .INDEX2 ); 
3 3886 5 
; 3867 7 BGNSUB ; 
; 3688 7 XMIT_ILOOP_PACKET ( ONE ); 
; 3889 5S ENDSUB; 
3 3890 4 END; 
: 3891 3 3 
: 3892 3 
:; 3893 3 INCR DOCK | FROM 0 TO S DO 
>; 3894 3 TARGET_ADR { .INDEX2 ) = ZERO; 
3 3895 3 
; 3896 i ENDTST; 
.SBTTL $T17 TEST 17 - STATION ADDRESS TEST 
000000 004137 000000G $717: JSR Ri, $SAVE4 ; 3758 
000004 004737 000000G JSR PC, T.OEQNA : 3816 
000010 004737 000000G JSR PC PREP .FOR. SETUP ; 3817 
000014 012701 000006 MOV 3; *, INDEX1 3818 
000020 010146 1$: MOV R1,-CSP) ; INDEX1,<« 3819 
000022 162716 000005 SUB ’ 
000026 010146 MOV R1,-CSP) ; INDEX1,« 
000030 004737 000000G JSR PC, WRT. STATION. ADR 
000034 CMP (SP)+,(SP)+ 
000036 005201 INC R1 ; INDEX1 3818 
000940 020127 000023 cmMP R1,023 ; INDEX1,¢ 
000044 003765 BLE 1$ 
000046 104402 2s: TRAP 2 ; 3819 
000050 012746 000200 MOV $200, -( SP) ; 3822 
000054 004737 000000G JSR PC, XMIT. SETUP .PACKET 


EE eeeeeeeEeEeEeEeEeeeEeEeeEeEeEeEeEeEeEeEeEeEeEeEeEeEeeeeEeEeEeEeEeEeEeEeEeEeEeEeEeaEmEeeeeeeeeeeeeeeeeeeee ae 


Ni5 
SEQ ease 
CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Blies-16 V4.0-579 Pege 112 
TEST 17 - STATION ADDRESS TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG. DEQNA JNGNAS.BLI;1 (40) 
TST (SP )+ ; 3819 
TRAP 67 ; 
ROR RO 3822 
BLO 2s 
000006 000000G MOV $6, RBUF .LENGTH z 3829 
000006 MOV $6,RO $ 3830 
ASR RO 
NEG RO 
000000G MOV RO, XBUF .LENGTH 
000006 MOV 06,R2 ; *,INDEX1 3832 
3$: CLR -(SP) $ 3834 
MOV R2,-CSP) ’ INDEX1,¢ 
000000G JSR PC,.WRT.STATION.ADR 
4$: TRAP 2 
CLR (SP) : 3837 
000000G SR PC, XMIT.ILOOP .PACKET 
TRAP 67 
ROR RO 
BLO 4$ 
CLR RO ; INDEXe 3840 
000000G 5$: MOV @XMIT.BUFFER,R1 3 3842 
ADD RO,R1 3 INDEX2,# 
177777 MOV @-1,R3 
CLR 
BISB CR1),R4 
SUB R4,RS 
MOVB R3,CR1) 
000000G MOVE R3, TARGET .ADRCRO) ; *,*C INDEX2) 3843 
INC RO ‘ ; INDEX2 3840 
000005 CMP RO,@5 ; INDEX2,+¢ 
BLE 5$ 
6%: TRAP 2 $ 38344 
000001 MOV 41,CSP) : 3847 
JSR PC, XMIT.ILOOP .PACKET 
TRAP 67 
ROR RO 
BLO 6$ 
CMP (SP)+,CSP)+ ; 38353 
INC R2 :; INDEX1 3832 
000023 ay — ; INDEX1,« 
000016 000000G MOV #16, TEMP4 3 3851 
CLR ; INDEXS 3852 
000000 000003 ~ oa 40,03 3 3854 
000006 000000G MOV #6, TEMP4 ; 3856 
000000G 8$: JSR PC, RESET .DEQNA ; 3857 
000000G JSR PC PREP . FOR. SETUP 3 3858 
000000G MOV TEMP4 ,R2 : 3859 
MOV R3,-(SP) ; INDEX3,+* 3861 
000016 MOV #16, -CSP) 
SR PC ,6L$MUL 


So 


RO,R4 


pESSeSUHEStETEEICETERE 


CNOMAAO DEGNMA FUNCTIONM TES. 
TEST 17 - STATION SODRESS TEST 


94: 


15%: 


148; 


000000G 158: 


gaRSgaCSEESAQSsE ages eran RcawaRsgese 


5 


CLR 
JSR 


616 


12-Jul-1984 13:04:10 
21-Am-1 


-19864 08:36:17 





-(SP) 
— 





Ri 
R1,R2 
9% 


2 
#200, (SP) 
a 





RO 

11% 

66 ,RBUF -LENGTH 
RO 


RO, XBUF -LENGTH 
TEMP4 ,R2 


T. STATION, ADR 


IT, ILOOP , PACKET 


®X-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG .DEQNA ,NONAS .BLI;1 


3 INDEX4,« 


3 
3 INDEX4 
: INDEX4,« 


3 
: INDEX4 


: INDEX4,-« 


SEG 0196 
(40) 


3861 


é 


ae 


3 Routine Size: 
: Maximum eteck 


000000 
000000 
000004 
000006 
000010 
000012 


s Routine Size: 
+ Maximum eteck 


; 38697 
: 3898 


012701 
005004 
151004 


160401 
110110 
110162 
104402 


012716 
004737 
104467 
006000 
103770 
005202 
020227 
003751 
022626 
005205 
020527 
003621 
005000 
105060 


020027 
003772 
000207 


004737 
104466 


006000 
103775 
000207 


i 
1 


CNQNAAO DEGNA FUNCTIONAL TEST 
TEST 17 - STATION ADDRESS TEST 









177777 MOV 
CLR 
81s8 
SUB 
*OvB 

000000G MOvB 

16%: TRAP 

000001 OV 

000000G JSR 
TRAP 
aed 
BLO 
INC 

000005 CMP 
BLE 
chp 
INC 

000003 CMP 
BLE 
CLR 

000000G 17%: CLRB 
INC 

000005 CMP 
BLE 
RTS 

205 words, Routine Base: ABSCODES 

depth per invocetion: 12 words 
.SBTTL 

017200’ Ti7:: 

18; JSR 
TRAP 
Ge 
BLO 
RTS 
6 words, Routine Base: 
depth per invocetion: 2 words 


C16 


12-Jul-1964 15:04:10 
21-Jun-1964 08:36:17 


@-1,R1 

wo 

CRO) ,R4 

R4 R11 

R1,CRO) 

R1, TARGET .ADRCR2) 


2 
#1.(€SP) 
a 








RO 

16% 

Re 

R2,05 

15% 

CSP )+,CSP)- 
R3 

R3, 03 

7$ 





RO 
TARGET . ADRC RO) 
RO 


RO,@5 
17% 
PC 








pana Bliss-16 v4.0-579 


—7 


SEQ 0197 
P 


114 
IDERSUSERS : [BERG . DEQNA )NONAS .BLI;1 om 40) 


@, eC INDEX2) 


; INDEX2 
3 INDEX2,¢ 


: INDEXS 
é INDEXS, e 


INDEX2 

eC INDEX2) 
INDE X2 
INDEX2,* 


Ti7 TEST 17 - STATION ADDRESS TEST 


PC,$T1i7 
66 


RO 
is 
PC 


ABSCODES « 20032 


3694 





{ —_—— 


D16 








- error message if not inhibited 


call compere packets 
ee 


NQNA 3 CNQNAAO DEQGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Blies-16 v4.0-579 = Pane 115 
v01.0 TEST 186 - ALi MULTICAST ST‘ *ION ADDRESS TEST 21-sdm-1984 06:36:17 SPIDERS USERS : (BERG. DEQNA )NONAS. BLI;1 (41) 
; 3899 «(1 SSBTTL ‘TEST 16 - ALL MULTICAST STATION ADDRESS TEST’ 

; 3900 1 fee 

$ 3901 1 : 

; He : TEST 18: ALL MULTICAST STATION ADDRESS TEST 

; 

3 3904 : DESCRIPTION: 

r 3905 

: 5906 1 ? This test vefifies that DEQNA recognizes ‘all aulticest’' eddresses of 
s 53907 1 § the end discards loopbeck packets with non-enabled . 
; 5906 1 : If the operator specifies loop on error, the progrem re-executes the 
: +944 : . code thet detected the error until tC is entered. 

3 

s wees 8 $ Hardwere tested: All Multicast Addressing 

P 3912 1 : 186051 Microprocessor 

P Ae 94 : . Address Filter Circuitry 

$ 

; cota : Set of ‘ell multicest’ eddresses: 

$ 

; 3917 i : DEQNA Physicel Addr FF -FF -FF -FF -FF -FF 

$ 3916 i : AA-00-00-00-00-00 55-55-55-55-55-55 

‘ 3919 1 : AA-00-02-AA-AA-AA AA-AA-AA-AA-AA-AA 

$ 3920 1 ? AA-00-05-55-55-55 01-00-00-00-00-00 

5 5921 1 ? AA-00-04 -FF -FF -FF AB-AA-AA-AA-AA-AA 

: 3922 1 : AA-00-04-00-00-00 FF -00-01-02-03-04 

s 53925 1 : AA-00-04-16-81- .8 00-F4-FA-44-44-55 

; 53924 1 H 

$ 3925 1 : Processing: 

5 3926 1 : 

é 3927 1 : BEGIN 

8 5928 i : reset 

: 3929 1 : select internal loopback mode 

; 3930 1 : set mode to Setup 

: 3931 1 : load Station Address RAM with ‘all multicast’ addresses 

s 58932 1 ! REPEAT for ‘ell multicest’ addresses in and out of set 

: 3933 1 : loed ‘all multicast’ eddress of the packet 

’ 3934 1 $ disable receiver 

: 3935 1 : tranemit loopback packet 

$ 5936 1 : enable receiver 

8 3937 1 : check for expected loopbsck status 

i 3936 1 : IF error 

i 3939 1 : THEN 

3 1 ? 

: 1 ? 

: 1 : 

3 1 : 

: 1 : 

: i : 





HUMMUS PADS SSaVVUVUS SSO & & BwUvw wi ww ww ww wu YI Ui Ut Us Us Ut U8 Ut Ut 8 Gt Ge Ut 





E16 


¢ RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING 
TESTS IN EXTERNAL LOOPBACK MODE. 


RESET _DEQNA ( ); 

PREP_FOR_SETUP ( ); 

INCR” INDEX X1 FROM 1 TO 13 DO 

WRT _STATION_ADR ( .INDEX1, .INDEX1 ); 
WRT_STATION_ADR ( 14, PHA_INDEX ); 








BGNSUB ; 
XMIT_SETUP_PACKET ( A_MODE ); 
NOSUB; 


E 
te 
! NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 
. 


RBUF LENGTH = 6; 
XBUF LENGTH = - ( -RBUF LENGTH ¢ -1 ); 
INCR INDEX FROM 6 TO 19 DO 


WRT_STATION_ADR € ZERO, .INDEX ); 


BGNSUB; 
XMIT_ILOOP_PACKET ( ZERO ); 


ENDSUB; 
INCR INDEX2 FROM O TO S DO 
XMIT_BUFFER [ .INDEX2 }) = ( -.XMIT_BUFFER [ .INDEX2 } ) - 1; 
TARGET_ADR { .INDEX2 } = eat _BUFFER [ .INDEX2 ]; 
$ 
XMIT_BUFFER ({ ZERO } = T_BUFFER [ {ZERO } AND #0°177774'; 
TARGET_ADR [ ZERO ) = iout _BUFFER ({ ZERO }; 
BGNSUB ; 
XMIT_ILOOP_PACKET ( ONE ); 
ENDSUB; 
END; 


INCR INDEX2 FROM O TO S DO 
TARGET_ADR [ .INDEX2 ] = ZERO; 


ENDTST; 


SEG ee 
CNQNAAO DEQGNA FUNCTIONAL TEST 12-Jul-1964 13:04:10 VAX-11 Bliss-16 V4.0-579 Page 116 
TEST 16 - ALL MULTICAST STATION ADDRESS TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : [BERG .DEQNA )NOQNAS.BLI;1 (42) 
BGNTST; 
See 


me ee eee 


000000G 
177777 


CNGNAAO DEQNA FUNCTIONAL TEST 
TEST 16 - ALL MULTICAST STATION ADDRESS TEST 


. SBTTL 


$7186: 


1%: 


2s: 


3$: 


4$: 


5$: 


6%: 


TCP EEEe er eeerey 


BLC 


S653 


F16 





SEQ 50200 
12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 Page 117 
21-Jun-1984 08:36:17 SPIDERSUSERS:(BERG.DEQNA)JNQNAS.BLI;1 (42) 
$T18 TEST 18 - ALL MULTICAST STATION ADDRESS TEST 
R1, $SAVE4 : 3896 
PC .RESET.DEQNA ; 3953 
PC PREP .FOR. SETUP ; 3954 
@1,R2 3 @, INDEX2 3955 
R1,-(SP) ; INDEX1,¢ 3956 
R1,-(SP) ; INDEX1,¢« 
PC, WRT. STATION. ADR 
(SP)+,(SP)+ 
R1 ; INDEX1 3955 
016. -(SP) : 3957 
023, -(SP) 
PC. URT . STATION. ADR 
9201,.(SP) : 3960 
OC .XHET. SETUP. PACKET 
RO 
2$ 
6, RBUF .LENGTH ; 3967 
06,R0 3 3968 
RO 
RO 
RO, XBUF .LENGTH 
06,R2 ; #, INDEX 3970 
(SP) j 3972 
R2,-(SP) ; INDEX,« 
SC MAT . STATION ADR 
(SP) 3 3975 
PC .XMIT. LOOP PACKET 
RO 
4$ 
RO ; INDEX2 3978 
@XMIT .BUFFER,R1 ; 3980 
Rl ’ INDEX2,¢ 
6-1,R5 
(R1),R4 
R4,R3 
R3,(R1) 

R3, TARGET. ADR(RO) ; #, *CINDEX2) 3981 
RO 3; INDEX2 3978 
RO. 05 ; INDEX2,¢ 
03,XMIT. BUFFER : $964 
XHIT BUFFER, TARGET. ADR ; 3985 
@1,(SP) ; 3988 
PC, XMIT. ILOOP.PACKET 


: Routine Size: 


003772 
022626 
000207 


97 words, 


CNQNAAO DEQNA FUNCTIONAL TEST 
TEST 16 - ALL MULTICAST STATION ADDRESS TEST 


; Meximum steck depth per invocation: 10 


000000 
000000 
000004 
000006 
000010 
000012 


3: Routine Size: 


004737 


104466 
006000 


103773 
000207 


6 words, 


T18:: 
18: 


; Maximum steck depth per invocation: 2 


3 3997 
3 3998 


1 
1 


Routine Base: 
words 


Routine Base: 
words 


G16 
12-Jul-1984 13:04:10 
21-Jun-1984 08:36:17 


TRAP 67 

ROR RO 

BLO 6% 

TST CSP )-« 

INC Re 

CMP R2,023 

BLE 3$ 

CLR RO 

CLRB TARGET . ADRCRO) 
INC RO 

CMP RO,@5 

BLE 7$ 

CMP CSP )+.CSP)- 
RTS PC 


ABSCODE$ + 20046 


-SBTTL 118 TEST 18 - ALL MULTICAST STATION ADDRESS TEST 


JSR PC,$T18 
66 


TRAP 

ROR RO 
BLO 1$ 
RTS PC 


ABSCODE$ + 20350 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG . DEGNA JNQNAS. eLIs1 


; INDEX 
3; INDEX,«¢ 


INDE X2 

*( INDEX2 ) 
INDE X2 
INDEX2, ¢ 


SEG ones 


118 


(42) 


3971 
3970 


3993 
3994 
3993 


3896 


3994 


H1i6 


NQNAS CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Blies-16 V4.0-579 _. ege 119 
v91.0 TEST 19 - RUNT PACKET TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : [BERG . DEQNA JNQNAS. ers oF a3) 
; 3999 1 SSBTTL ‘TEST 19 - RUNT PACKET TEST’ 

; 4000 1 fee 

; 4001 1 : 

; 4002 1 ¢ TEST 19: RUNT PACKET TEST 

3 4003 1 : 

; = : : DESCRIPTION: 

3 . 

: 4006 1 8 This test verifies that the DEGNA can detect runt packets in FIFO. 
3 4007 1 H If the operetor specifies loop on error, the program re-executes the 
; 4008 : : code that detected the error until tC is entered. 
i > 

; 4010 1 8 Hardware tested: EPP 

; 4011 1 H Address Filter Circuitry 
3 4012 1 : 

3 4015 1 : Station Address teble: 

: 4014 1 : 

: 4015 1 : DEQNA Physicel Addr 

3 4016 1 : AA-00-00-00-00-00 

8 4017 1 : AA-00-02-AA-AA-AA 

; 4016 1 : AA-00-05-55-55-55 

3 4019 1 : AA-00-04-FF -FF -FF 

3 4020 1 : AA-00-04 -00-00-00 

3 4021 1 H AA-00-04-18-81-18 

s 4022 1 § 

; 4023 1 : Processing: 

3 4024 1 8 

3 4025 1 : BEGIN 

3 4026 1 : reset device 

; 4027 1 : select internal loopbeck mode 

: 40286 1 : lead Station Address RAM with Station Addresses from table 
3 4029 1 : load pecket with valid Station Address 

8 4030 1 : diseble receiver 

$ 4031 1 : trensmit loopbeck packet 

3 4032 1 : enable receiver 

; 4033 1 : check for expected loopbeck status 

$ 4034 1 : If error 

; : print error message if not inhibited 
3 4037 1 : IF 

8 4036 1 : loed pecket with invalid Station Address 
3 4039 1 : disable receiver 

3 4040 1 : transmit —— packet 

; 4041 1 : enable receiver 

3 4642 1 : check for expected loopback status 

$ 4043 1 : If error 

Sb 2 laws 0 

3 print error mes if not inhibited 
; 4046 1 : ENDIF 

3 4047 : : END 

3 : 
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CNQNAAO DEQGNA FUNCTIONAL TEST 12-Jul-1984 13:04 
TEST 19 - RUNT PACKET TEST 21-Jun-1964 08:36 


BGNTST; 


SEQ 
:10 VAX-11 Bliss-16 V4.0-579 peas ane 
217  SPIDERSUSERS:[BERG.DEQNAJNQNAS.BLI;1 | (44) 


See 


$ RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING 
* TESTS IN EXTERNAL LOOPBACK MODE. 


RESET_DEQNA ( ); 
PREP_FOR_SETUP ( ); 
INCR INDEX1 FROM 6 TO 19 D0 
WRT_STATION_ADR ( .INDEX1 - 5, PHA_INDEX ); 


XMIT_SETUP_PACKET ( N_MODE ); 
ENDSUB; 


NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY 


RBUF _LENGTH = 6; 
XBUF LENGTH = - ( .RBUF_LENGTH f -1 ); 


WRT_STATION_ADR ( ZERO, PHA_INDEX ); 


BGNSUB; 
XMIT_ILOOP_PACKET (€ ZERO ); 
ENDSUB; 


BGNSUB; 
WRT_STATION_ADR ( ZERO, 2 ); 
.IOP_TABLE { CSR ] = ONE; 


SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
-10P_TABLE"{ RLO_ADR ) = RCVD_LIST; 
.I0P_TABLE { RHI_ADR } = ZERO; 


T_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
TOR TABLE } = XLO_ADR } = XMIT_O LIST; 
.10P TABLE { XHI_ADR } = ZERO; 


CHK_RIXI_STATUS ( ZERO ); 
CHK STATUS ( CSR_ STATUS, CSR_MASK ); ' 0'100220', 0° 100220° 
CHK XMIT STATUS ( XFLG.STATUS, xWO012_STATUS 3 ' 0'140000' , 0'000400’ 
CHK"RCV_STATUS ( RFLG_STATUS, RWD16_STATUS ); ' O° 


-IOP_TABLE { CSR ) = ZERO; 
i 


ENDTST; 


QNA FUNCTIONAL TEST 


CNQNAAO DE 
TEST 19 - RUNT PACKET TEST 


$719: 


1%: 


2s: 


4$: 


- SBTTL 


meaeececones 


“ 
D 
% 


payaceagesegeays 


J16 


12-Jul-1984 13:04:10 
21-Jun-1984 06:36:17 


ae TEST 19 - RUNT PACKET TEST 


-(SP) 
PC, uRT. STATION. ADR 
CSP)» +, CSP )-+ 


1 
R1,023 
1$ 
2 
#200, -( SP) 
PC, XMIT. SETUP.PACKET 
(SP)- 
67 
RO 
2$ 
06 ,RBUF .LENGTH 
eRO 
RO 
RO 
—_—e 


623, -(SP) 
pean natalie 


(SP) 
PC, XMIT.ILOOP .PACKET 


60000, -( SP) 
PC,SET.XDESCR.LIST 
oxMIT.D.LIST,@IOP. TABLE+10 
@IOP . TABLE+12 


(SP) 

PC CHK .RIXI.STATUS 
@-77560, (SP) 

(SP), -(SP) 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG .DEQNA JNQNAS. BLI;1, 





¢, INDEX1 
INDEX1,¢ 


INDEX1 
INDEX1,¢ 


SEQ —— 


121 
(44) 
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NQNA3 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 ee Peas 122 
v01.0 TEST 19 - RUNT PACKET TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : [BERG .DEQNA JNQNA3.BLI;1 (44) 
000254 004737 000000G JSR PC ,.CHK.CSR.STATUS 
000260 012716 140000 MOV @-40000, (SP) ; 4093 
000264 012746 MOV #400, -( SP) 
000270 004737 000000G JSR PC ,.CHK.XMIT.STATUS 
000274 012716 140000 MOV @-40000, (SP) : 4094 
000200 012746 044000 MOV 44000, -(SP) 
000304 004737 000000G JSR PC .CHK.RCV.STATUS 
000310 005077 000016G CLR @IOP . TABLE +16 : 4096 
000214 062706 000014 ADD #14,SP ; 4076 

320 104467 TRAP ; 
000322 ROR 
000324 103706 BLO 

326 CMP (SP)+,CSP)-« ; 3996 
000330 012601 (SP)-,R1 
000332 RTS 
; Routine Size: 110 words, Routine Base: ABSCODE$ + 20364 
; Maximum steck depth per invocation: 10 words 

-SBTTL T19 TEST 19 - RUNT PACKET TEST 

000000 004737 020364’ T19:: 
000000 1$: JSR PC,.$T19 : 4097 
000004 104466 TRAP 66 
000006 006000 ROR RO 
000010 103773 BLO i$ 
000012 000207 RTS PC 
; Routine Size: 6 words, Routine Base: ABSCODES + 20720 
; Maximum stack depth per invocation: 2 words 


$ 4100 1 
$ 4101 1 


Pe ee ee eee ee ee be ee ee ee ee ee ee ee ee ee ee ee be be Fe ee ee pe 
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SEQ eee 


VAX-11 Bliss-16 V4.0-579 


12-Jul-1984 13:04:10 
SPIDERSUSERS : (BERG. DEQNA JNQNA3.6LI;1 


DEQNA FUNCTIONAL TEST 
21-Jun-1984 08:36:17 


CNQNAAO 

TEST 20 - FIFO OVERFLOW TEST 

SSBTTL ‘TEST 20 - FIFO OVERFLOW TEST‘ 
a 


TEST 20: FIFO OVERFLOW TEST 


DESCRIPTION: 


This test verifies that the Ethernet Protocol Processor can 
detect receive FIFO overflow condition. If the operator specifies 
loop on error, the program re-executes the code that detected the 
error until tC is entered. 


Hardware tested: RCV Status wd 1 - error summary (bit 14), 
FIFO overflow (bit 0), 

Byte FIFO in the EDLC, 

and discard packet (bit 12) 


Processing: 


BEGIN . 
reset device 
select loopback mode 
enable receiver € set ~% bit 0) 


packe 
transmit enother loopback packet 
check for expected loopback status 
IF error 
THEN 
aes error message if not inhibited 


reset device 
transmit Soames pecket 


packet 
setup Receive Descriptor Lis 
enable receiver (set CSR BIT “oO 
check for expected loopback status 
IF error 
THEN 
print error message if not inhibited 


turn of 3 LED's on the module 
END 


OS OD OS OS OS OS OS OS OS 1S OS OS OS OS 6S 6S 1S 6S 6S 1S 1S 1S OS OS CS 6G 1 6@ 6 2 te °@ ¢@ +@ +@ +@ +S +@ +@ 6@ +@ t@ 
> 


Page 123 
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NQNA3 CNQNAAO DEQNA re. TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 sy 
vo1.0 TEST 20 - FIFO OVERFLOW TEST 21-Jun-1984 08:36:17 SPIDER SUSERS : (BERG .DEQNA JNQNAS .BLI;1 (46) 
4145 BGNTST; 


See 
! RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM 


RESET_DEQNA ( ) 

PREP_FOR_SETUP ( ); 

INCR INDEX1 FROM 1 TO 14 DO 
WRT_STATION_ADR ( .INDEX1. PHA_INDEX ); 


BGNSUB ; 
XMIT_SETUP_PACKET (€ P_MODE ); 
ENDSUB ; 


LOOPBACK 2 6-BYTE PACKETS IN INTERNAL. LOCPBACK MODE CHECK IF PACKETS 
WERE RECEIVED PROPERLY, SHOULD TRANSHIT AND RECEIVE PROPERLY. 


RBUF LENGTH = 
XBUF "LENGTH = — °C -RBUF _LENGTH ft -1 ); 
INCR INDEX FROM 2 TO 3 DO 
BEGIN 
WRT_STATION_ADR ( ZERO, .INDEX ); 


BGNSUB ; 
oe € ZERO ); 
3 


Ss 
: " FORCE RECEIVE FIFO OVERFLOW ( RCV STATUS WD 1 - BIT O ) BY TRANSMITTING 
2 e 2 ND 6-BYTE PACKET IN INTERNAL LOOPBACK MODE BEFORE RECEIVING FIRST PACKET 


BGNSUB ; 
.IOP_TABLE { CSR ) = ZERO; 
WRT_STATION_ADR ( ZERO, 2 ); 


SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
.IOP_TABLE [ XLO_ oR ] = a ” LIST; 
.IOP_TABLE ({ XHI_ADR ] = 


CHK_RIXI_STATUS ( ONE ); 
WRT_STATION_ADR ( ZERO, 3 ); 


SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 
-IOP_TABLE [ XLO_ADR ] = XMIT_D_LIST; 
-IOP_TABLE [ XHI_ADR ] = ZERO; 


SO SO G2 GO SO GP GP G2 GF GS GP GO GF GS GF GP GO GP GF GP GS GP GP GP GP GP GF GP GF GP Ge Ge GP GP GS GS Ge Ge Ge GP GP GS Gs GS GF GS Gs Ge Ge GS GS Gs oe 
2 
~ 
se 
tw 
Soe eee eee ee ee a eee rere rere ie ir ir ir ir ir irre 





E 
NQNAS CNONAAO DEQMA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 . “oane 125 
v01.0 TEST 20 - FIFO OVERFLOW TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : (BERG. DEQNA JNONAS.BLI;1 (46) 
» 419% 5 SET_RDESCR_LIST ( .XBUF_LENGTH, VE )- 
; 4199 § “IOP TABLE [ RLO_ADR } = RCv_D_LIST; 
; 4200 3 “IOP TABLE { AHI_ADR } = ZERO; 
s 201 
; 4202 > .IOP_TABLE { CSR j = ONE; 
: 4 
; 6204 § CHK _RIXI_STATUS ( ZERO ); 
; 4205 5 Cue CSR_STATUS ( CSR_ STATUS. CSR_MASK ); ! 0'100220', 0° 100220' 
; 4206 5 CHK XMIT_STATUS ( XFLG_STATUS, xwD12_STATUS ); ! 0° 140000’, 0'000400' 
; 4207 3 CHK"RCV_STATUS ( RFLG_STATUS, RWD1S_STATUS ); ! 0°140000',, 0°000001' 
4 
; «4209 5 .I0P_TABLE { CSR } = ZERO; 
; 4210 38 ENDSUB; 
3 4211 53 
; 4212 3 RESET_DEQNA ( ); 
: 4215 3 
; 4214 3 TURN_OFF_LED ( N_MODE ); 
; 4215 3 TURN_OFF_LED ( LED1 ); 
8 4216 3 TURN. OFF LED ( LED2 ); 
; 4217 3 TURN_OFF_LED ( LED3 5; 
s 4216 3 
s 4219 1 ENDTST; 
.SBTTL $T20 TEST 20 - FIFO OVERFLOW TEST 
000000 010146 $720: MOV R1, -(SP) ; 4099 
000002 004737 000000G JSR PC ,RESET.OEQNA : 4i51 
000006 004737 000000G JSR PC PREP .FOR. SETUP ; 4152 
000012 012701 000001 MOV #1,R1 ; *#, INDEX1 4153 
000016 010146 1$: MOV R1,-<SP) 3; INDEX1,¢ 4154 
000020 012746 000023 MOV 023,-(SP) 
000024 004737 JSR PC,.WRT.STATION.ADR 
00003C 022626 CMP (SP)+,(SP)- 
000032 005201 INC Ri ; INDEX1 4153 
000034 020127 000016 CMe R1, 016 ; INDEX1,« 
000040 0037 BLE 1$ 
000042 1044 2s: TRAP ; 4154 
000044 012746 000202 MOV 0202, -(SP) ; 4157 
000050 004737 0000006 JSR PC, XMIT. SETUP.PACKET 
000054 005726 TST (SP). : 4154 
000056 104467 TRAP 67 ; 4157 
000060 ROR RO 
000062 103767 BLO 2$ 
000064 012737 000006 000000G MOV 06, RBUF .LENGTH ; 4165 
000072 012700 MOV 06,RO ; 4166 
000076 ASR RO 
000100 005400 NEG RO 
000102 010037 0000006 MOV RO, XBUF .LENGTH 
000106 012701 000002 MOV 22,R1 ; *#, INDEX 4168 
000112 3$: CLR -(5P) ; 4170 
000114 010146 MOV R1,-(SP) ; INDEX,¢ 
000116 004737 000000G JSR PC,WRT. STATION. ADR 
000122 104402 4$: TRAP 2 


——— 


Ci 
' SEQ 0209 
CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 Pege 126 
TEST 20 - FIFO OVERFLOW TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : [BERG .DEQNA JNQNAS.BLI;1 (46) 
CLR (SP) : 4173 
000000G JSR PC. XMIT.ILOOP .PACKET 
TRAP 67 
ROR RO 
BLO 4$ 
CMP CSP }+,CSP)-« : 4169 
INC R1 ; INDEX 4168 
000003 CMP R1,¢35 ; INDEX, 
BLE 3$ 
S$: TRAP 2 : 4175 
000016G CLR @IOP . TABLE +i6 : 4183 
CLR -(SP) : 4185 
000002 MOV @2,-CSP) 
000000G JSR PC,.WRT.STATION.ADR 
000000G MOV XBUF .LENGTH, (SP) : 4187 
120000 MOV o- -(SP) 
000000G JSR PC,SET. XDESCR.LIST 
000000G 000010G MOV @xMIT. .D. LIST, @IOP. TABLE +10 ; 4188 
000012G CLR @IOP . TABLE +12 $ 4189 
000001 MOV 01,.(€SP) $ 4191 
JSR PC CHK .RIXI. STATUS 
CLR (SP) ; 4192 
000003 MOV @3,-(SP) 
000000G JSR PC ,,WRT.STATION.ADR 
000000G MOV XBUF . LENGT H.CSP) : 4194 
120000 MOV Q- SP) 
000000G JSR PC,SET.XDESCR.L LIST 
000000G 000010G MOV OxXMIT.DO.LIST,@IOP. TABLE+-10 : 4195 
0000126 CLR @I0P . TABLE +12 : 4196 
000000G MOV pet os gee (SP) $ 4196 
120000 MOV @-60000, - 
000000G JSR PC,SET .RDESCR.LIST 
000000G 000004G MOV ORCV.D.LIST,.@IOP. TABLE +4 : 4199 
000006G CLR @IOP . TABLE +6 : 4200 
000001 0000166 MOV @1,@I0P. TABLE +16 s 4202 
CLR : 4204 
JSR PC .CHK .RIXI.STATUS 
100220 MOV @-7 (SP : 4205 
MOV CSP), -CSP) 
JSR PC. CHK .CSk.STATUS 
140000 MOV #-40000, (SP) $ 4206 
000400 MOV #400, -( SP) 
JSR PC CHK. XMIT. STATUS 
140000 MOV @-40000, (SP) : 4207 
000001 MOV 61, -(SP) 
JSR PC ,.CHK .RCV. STATUS 
000016G CLR @I0P . TABLE +16 3 4209 
000022 ADD @22,SP : 4175 
TRAP 67 ; 4209 
ROR RO 
BLO 5% 
000000G JSR PC RESET .DEQNA : 4212 
000200 MOV #200, -(SP) : 4214 
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NQNA3 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 VAX-11 Bliss-16 V4.0-579 Penn 127 
vo1.0 TEST 20 - FIFO OVERFLOW TEST 21-Jun-1984 08:36:17 SPIDERSUSERS : [BERG.DEGQNA JNQNAS.BLI;1 (46) 
000422 004737 000000G JSR PC, TURN.OFF .LED 
000426 012716 000204 MOV @2064 ,C SP) : 4215 
000432 004737 000000G JSR PC. TURN. OFF .LED 
000436 012716 000210 MOY 9210,(SP) : 4216 
000442 004737 000000G JSR PC, TURN.OFF .LED 
000446 012716 000214 MOV @214,(SP) ; 4217 
000452 JSR » TURN. OFF .LED 
000456 005726 TST )e ’ 4099 
000460 012601 MOV (SP)+,R1 
000462 RTS 
; Routine Size: 154 words, Routine Base: ABSCODES + 20734 
; Maximum stack depth per invocetion: 11 words 

.SBTTL T20 TEST 20 - FIFO OVERFLOW TEST 
000000 004737 020734’ T20:: 
000000 1$: JSR PC,$T20 ; 4217 
000004 104466 TRAP 66 
000006 006700 ROR RO 
000010 103775 BLO 1% 
000012 000207 RTS PC 
3; Routine Size: 6 words, Routine Base: ABSCODES + 21420 
: Maximum steck depth per invocation: 2 words 
: 4220 1 
3 4221 1 END 
$ 4222 0 ELUDOM 
3 OTS external references 

-GLOBL $SAVE4, ‘SAVE3, $SAVE2, BLSSHF 

-GLOBL B6LSMUL 
3 PSECT SUMMARY 
: 
$ Psect Name Words Attributes 
: AB SCODE$ 4494 ae @. « 286° 2, COR 


Library Statistics 


we eeceee Symbols -------- Pages Processing 
File Total Losded Percent Mapped Time 





Ed 


NQNA CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:04:10 
vO1_O TEST 20 - FIFO OVERFLOW TEST 21-Jun-1984 08:36:17 
; SPIDERSUSERS: (BERG. DEQNA JQNALIB.L16;3 223 139 62 14 


COMMAND QUALIFIERS 
BLISS/PDP11/ENV:NOEIS NQNA3.BLI/LIST=NQNA3.LIS/OBJECT =NQNAS .OBJ/SOURCE =PAGE : 55 


Size: 4494 code + 0 date words 
~~ dey O og 
apsed me: $ ° 
See e a hes 2197 
Tear tat tiger 25934 
: pages 
Comp i Gotlesten Complete 


SEQ Pa 


VAX-11 Bliss-:6 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA INGNAS. BLI;1 


00:00.1 


128 
(46) 
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CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35  VAX-11 Bliss-16 v4.0-579 “sae % 
21-Jun-1984 08:36:19 SPIDERSUSERS : (BERG. DEQNA JNQNAG .BLI; 1 (1) 
MODULE NQNA4 (sSTITLE =. DEGNA FUNCTIONAL TEST’ 
IDENT = "VO1.0 
ADDRESSING. MODEC ABSOLUTE ) 


) = 
SSBTTL ‘GLOBAL ROUTINE DECLARATION MODULE’ 


BEGIN 

LIBRARY ‘QNALIB’; ! QNALIB LIBRARY 

REQUIRE ‘BLSMAC REQ’ ; ! DIAGNOSTIC SUPERVISOR LIBRARY 
! <BLF /NOF ORMAT > 


x 
a: 
~ 
°o 


ee ee he ee be he be be ee Fe Fe et ee ee be be be ee be ee ee be be be ee pe be be be pe 


Gi 


12-Jul-1 13 


CNQNAAO DEQNA FUNCTIONAL TEST 984 13: 
21-Jun-1984 08: 


09:35 
GLOBAL ROUTINE DECLARATION MODULE 36 


:19 


PSECT 
CODE = ACSCODES; 
FORWARD ROUTINE 
XMIT_AND_RCV_PACKET : NOVALUE; 
: 
- EXTERNAL DATA USED BY THIS MODULE 
Ree 
EXTERNAL 
Se 
: : COMMUNICATION AREA DECLARATIONS 
$.. 
RCV_D_LIST : BLOCK [ D_SIZE, WORD ) FIELD ( OL_FIELDS ), 
XMIT_O_LIST : BLOCK [ D_SIZE, WORD } FIELD ( OL_FIELOS ), 
DESCR_LIST : BLOCK [ DESCR_SIZE, WORD) FIELD ( OL_FIELDS ), 
RCV_BUFFER VECTOR { B_SIZE, BYTE }, 
XMIT_BUFFER : VECTOR { B_SIZE, BYTE }, 
DATA_BUFFER : VECTOR [ _SIZE. BYTE }. 
SETUP _BUFFER : VECTOR { SETUB_SIZE, WORD }, 
IOP_TABLE s VECTOR [ 8, ]. 
BD_PROM_DESCR : VECTOR [{ BD_D_SIZE, WORD }, 
STATION_ADR ; VECTOR { 4, WORD }, 
T_ADR : VECTOR { T_SIZE, BYTE }. 
PHYS_ADR : VECTOR { 22, BYTE ), 
See 
HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS 


HWP_TABLE : REF BLOCK [ HWP_SIZE, WORD }] FIELD ( HWP_FIELOS ), 
SWP_TABLE =: REF BLOCK [ SWP_SIZE, WORD ] FIELD ( SWP_FIELDS ), 


REG_ADR : REF REG_STR FIELD ( IOP_FIELOS ), 
GET _ADR : REF ADR_STR FIELD ( IOP_FIELDS ). 
IOP _DATA : REF REG_STR FIELD ( IOP_FIELOS 3), 


SEQ 0213 
Page 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNA4 .BLI;1 


2 
(2) 





CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 wy 3 
GLOBAL ROUTINE DECLARATION MODULE 21-Jun-1984 08:36:19 SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI;1 (3) 

: 1542 1 

; 1543 1 See 

; 1544 1 ! MISCELLANEOUS DATA DECLARATIONS 

: 1545 1 $.- | 

; 1546 1 

. er 3 XBUF _LENGTH, RBUF _LENGTH, INTERRUPT _FLG, COUNTER, 

; 1548 1 SWP_BLOCK_MEM, SWP_TOUT_VAL, SWP_ILOOP, SwP_ TIMER, 

; 1549 1 up_CGOUNTER, DOWN_COUNTER, CHECKSUM, ERR_NUMBER, 

; 1550 1 ERR_COUNT, ERR_FLAG, CSR_WORD, PRIOO, 

; 1551 1 PRIO1, PRIO2, PRIO3, PRIO4, 

; 1552 1 PRIOS, PRIO6, PRIO7, DEQNA_NO : WORD, 

$ 1555 1 

P 1554 1 See 

; 1555 1 TEMPORARY STORAGE DATA DECLARATIONS 

$ 1556 1 §-- 

3 1557 i 

; 1558 1 Pi, P2, P3, P4, 

; 1559 1 TMP_IOP_ADR, TMP_REG_DATA,  TEMP1, TEMF2, 

; 1560 1 TEMP3, TEMP4, TEMPS, TEMP6, 

; 1561 1 TEMP7, TEMPS, TEMPS, TADR1, 

; S62 1 TADR2 : WORD, 

; 1563 1 TBYTE1, TBYTE2, TBYTES, TBYTE4 =: BYTE, 

$ 564 1 

3 1565 1 See 

, 1366 : DIAGNOSTIC ERROR MESSAGES DECLARED EXTERNALLY 

; s~ ? 

$ 1568 1 

; 1569 1 e 

; 1570 1 MSGO1, MSGO2, MSGO3, MSGO4, MSGOS, MSGO6, MSGO7, MSGO8, MSGO9, MSG10, 

s 1571 1 MSG11, MSG12, MSG13, MSG14, MSG15, MSG16, MSGi17, MSG18, MSG19, MSG20, 

s 1572 1 MSG21, MSG22, MSG23, 4, MSG25, MSG26, MSG27, MSG28, MSG29, MSG20, 

; 1573 1 MSG31, MSG32, MSG33, MSG34, MSG3S, MSG36, MSG37, MSG38, MSG39, MSG40, 

; 1574 1 MSG41, MSG42, MSG43, MSG44, MSG4S, MSG46, MSG47, MSG48, MSG49, MSGSO, 

; 1575 1 MSG51, MSGS2,. MSGS3, MSG54, MSGSS, MSGS6. MSG57, MSG58, MSGS9, MSG60, 

; 


7 oF © Ge Ge Ge Ge GF Ge oe Ge Ge Ge Ge oe 
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SEQ 0215 
VAX-11 Bliss-16 V4.0-579 Page 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-21 5 4 
:19  SPIDERSUSERS: (BERG. DEQNAJNONA4.BLI;1 (4) 


984 
GLOBAL ROUTINE - ERRORSREPORT ( ) 21-Jun-1984 08: 
SSBTTL ‘GLOBAL ROUTINE - ERRORSREPORT ( )’ 


> 
° 


GLOBAL ROUTINE : ERROR SREPORT 


DESCRIPTION: 
This routine reports errors to the operator 


SSBTTL ‘GLOBAL ROUTINE - ERRORSREPORT ( )' 
BGNMSG CERRORSREPORT ); 


-TITLE NQNA4 CNQNAAO DEQNA FUNCTIONAL TEST 
-IDENT /VO1.0/ 
ENABL AMA 


-GLOBL RCV.O.LIST, XMIT.D.LIST, DESCR.LIST 
-GLOBL RCV.BUFFER, XMIT.BUFFER, DATA.BUFFER 
“GLOBL SETUP.BUFFER, IOP.TABLE, 8D.PROM.DESCR 
-GLOBL STATION.ADR, TARGET.ADR, PHYS.ADR 
-GLOBL HWP.TABLE, SWP.TABLE, REG. ieee 

-GLOBL + yt IOP.DATA, XBUF .LENGTH 


.GLOBL LENG INTERRUPT .F LG, COUNTER 
-GLOBL Sw#P.BL .MEM, SWP.TOUT.VAL, aod os 
GLOBL ia T g “Cc + ° 


“GLOBL TSYTE1, TBYTE2, TBYTES. TBYTES 
-GLOBL MSGOO, MSGO1, MSGO2, MSGOS, MSGO4 


MSGOS 4 MSGO8, MSGO9 
-GLOBL MSGi0, MSG11, MSG12, MSG15, MSG14 
-GLOBL MSG15, MSG16, MSG17, MSG16, MSG19 
-GLOBL MSG20, MSG21, é. ean" MSG24 


‘ MSG26, 

-GLOBL MSG30, MSG31, MSG32, MSG53, MSG354 
-GLOBL MSG3S5, MSG36, MSG37, MSG38, MSG59 
-GLOBL MSG40, MSG41, MSG42, MSG43, MSG44 
~GL 7, MSG48 





SEQ 0 
5S  VAX-11 Bliss-16 V4.0-579 Aang 5 
:19  SPIDERSUSERS: (BERG. DEQNAJNQNA4 .BLI;1 (4) 


NQNA4S CNGNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 
v0O1.0 GLOBAL ROUTINE - ERRORSREPORT ¢ ) 21-Jun-1984 08: 


- SBTTL et aS ROUTINE - ERRORSREPORT ( ) 


000000 -PSECT ACSCODES, 
000000 004737 O00000V ERRORSREPORT: : 
JSR PC .MSERROR $REPORT : 1592 
000004 104423 TRAP =_- 23 
000006 000207 RTS PC 
; Routine Size: 4 words, Routine Base: ACSCODE$ + 0000 
; Maximum stack depth per invocation: 2 words 
3 1593 2 
3 1594 2 PRINTB ( MSGO3 
; 1595 2 PRINTB ( MSGO4, .XMIT_D_LIST [ FLGWD ], .RCV_D_LIST [ FLGWD ] ); 
3 1596 2 PRINTB ( MSGOS, . T_O_LIST ( OBITS }, .RCV_D_LIST [{ OBITS ) ); 
5 1597 2 PRINTB ( MSGO6, .XMIT_D_LIST [ LOADR J], .RCV_D_LIST [ LOADR ] ); 
$ 189@ 2 PRINTB ( MSGO7, .XMIT_D_LIST { TWOL )}, .RCV_D_LIST [{ TWOL ) ); 
; 1599 2 PRINTB ( .XMIT_D_LIST ({ STWO1 ) AND XWD1_MASK, .RCV_D_LIST { STWD1 ] AND RWD2_MASK ); 
: 1600 2 PRINTB ( MSGO9, .XMIT_D_LIST { STWD2 ] AND XWD2_MASK, .RCV_D_LIST [ STWD2 ] AND RLL_MASK ); 
: 1601 2 PRINTB ( MSG10, “CSR_WORD #0'133777' ); 
; 1602 2 PRINTB ( MSG11, .HWP_TABLE [ ADDR ] ); 
: 1603 2 
; 1604 1 ENDMSG; 
-SBTTL MSERRORSREPORT GLOBAL ROUTINE - ERRORSREPORT ( ) 
000000 012746 000000G MSERRORSREPORT : 
MOV @MSGO3, -(SP) : 1594 
000004 012746 000001 MOV #1,-CSP) 
000010 010600 MOV SP RO ; SP,«* 
000012 104414 TRAP 14 
000014 013716 000000G MOV RCV.D.LIST,CSP) : 1595 
000020 013746 000000G MOV XMIT.O.LIST,-CSP) 
000024 012746 000000G MOV @MSGO04 , -( SP) 
000030 012746 000003 MOV #3,-C(SP) 
000034 010600 MOV SP RO ; SP,« 
000036 104414 TRAP 14 
000040 013716 000002G MOV RCV.D.LIST+2,(SP) ; 1596 
000044 013746 000002G MOV XMIT.DO.LIST+2,-CSP) 
000050 012746 000000G MOV #MSGO5, -C(SP) 
000054 012746 000003 MOV #3,-CSP) 
000060 010600 MOV SP RO ; SP,« 
000062 104414 TRAP 14 
000064 013716 000004G MOV RCV.D.LIST+4,(SP) : 1597 
000070 013746 000004G MOV XMIT.O. LIST+4, -(SP) 
000074 012746 000000G MOV SP) 
000100 012746 000003 MOV #3,- (SP) 
000104 010600 MOV SP RO ; SP, 
000106 104414 TRAP 14 
000110 013716 000006G MOV RCV.D.LIST+6,(SP) ; 1598 


000266 
000272 


; Routine Size: 
3; Maximum stack 


$ 1605 i1 
3 1606 1 


CNGNAAO DEQNA FUNCTIONAL TEST 
$REPORT 


GLOBAL ROUTINE - ERRORS 


000060 


94 words, 
depth per invocation: 26 wo 


¢ 


) 


ADD 
RTS 


K1 


12-Jul-1984 13:09:35 
21-Jun-1984 08:36:19 


@MSGO7, -( SP) 
03, -(SP) 


Rcy D.LIST+10,(SP) 


XMET. 0. LIST+10, -(SP) 
pe ~C(SP) 

os, (SP) 

SP ,,.RO 


(SP) 
RCV.0.LIST+12,(SP) 
oe EN alle 


Routine Base: ACSCODE$ + 0010 
rds 


SEQ oes! 


VAX-1i1 seeks .foexe V4.0-S79 


SPIDERSUSERS 


; SP, 


; SP,* 


RG .DEQNA JNQNA4 .BLI;1 iow 


6 
(4) 


1599 


1600 


1602 


1592 





7 oF © © © oF =o S* G+ Ge Ge Ge Ge Ge oe 
~ 
oO 
~ 
> 
he be be be be be be ee be pe Be pe 


; Routine Size: 
: Maximum stack 


3 1622 2 
$ 1623 2 
$ 1624 2 
5 1625 1 
000000 012737 
000006 000207 


; Routine Size: 
; Maximum stack 


$ 1626 1 
: 1627 1 


SEQ 0218 
5 Page 7 
9 SPIDERSUSERS : (BERG. DEQNA JNQNA4 .BLI;1 (5) 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Blise-16 v4.0-579 


GLOBAL ROUTINE - E1SREPORT ( ) 21-Jun-1984 06 
SSBTTL ‘GLOBAL ROUTINE - E1$REPORT ( )’ 


a 
” 


GLOBAL ROUTINE : E1$REPORT 


SESCRIPTION: 
This routine reports errors to the operator 


SSBTTL ‘GLOBAL ROUTINE - E1$REPORT ( )' 
BGNMSG ( E1$SREPORT ); 


-SBTTL E1$REPORT GLOBAL ROUTINE - E1SREPORT ( ) 


000000V E1SREPORT:: 
JSR PC .MSELSREPORT : 1621 
TRAP 23 
RTS PC 

4 words, Routine Base: ACSCODE$ + 0304 


depth per invocation: 2 words 


TEMP1 = 1; 
ENDMSG; 
. Or he MSELSREPORT GLOBAL ROUTINE - E1SREPORT C( ) 
000001 000000G MSE1$ : 
MOV #1, TEMP1 : 1623 
RTS PC ; 1621 
4 words, Routine Base: ACSCODES + 0314 
depth per invocation: O words 


Pe ee ee ee ee ee ee ee ee ee ee ee ee pe pe ee ee 





M1 


CNQNAAO DEGNA FUNCTIONAL TEST 
GLOBAL ROUTINE - RESET_DEQNA ( ) 21-Jun-1984 08:36:19 SPIDER SUSERS : (BERG. DEQNA JNQNAG .BLI;1 


@SBTTL ‘GLOBAL ROUTINE - RESET_DEQNA ( )° 
GLOBAL ROUTINE RESET_DEQNA : NOVALUE = 


aa 
> 


GLOBAL ROUTINE : RESET_DEQNA 


DESCRIPTION: 


This routine verifies that DEQNA can be reset by setting bit 1 in the 
Saar After the reset, CSR is checked for nominal 
stetus. 


Hardware tested: Q-Bus DMA Interface 
Processing: 
BEGIN 
set Software Reset (SR) bit in CSR and check for 


expected CSR status 
IF error 


ten error message if not inhibited 
clear SR bit in CSR and check for expected CSR status 
IF error 
THEN 
eo error message if not inhibited 
END 


INPUT PARAMETERS: 


12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 


SEG 0219 


ot 


ne 
°o 


oF OF SF OF Sy OF OF GF ae HF GF GF GF GF GF Gr Gr Gr GF GF GF GH GH GF GF Gr Ge GH GF Gr Gr Gr GF Gr Gr Gr Ge OH OF Os Ge Or Ge Ge Oe oe 
oF RD 8 G8 8 8 8 Gd GP 90 10 90 1 0 10 90 90 900 90 90 90. Ga Gt Gt 6 Gt td GR FE 1K PK KY PY PY PD ee 


SEQ 0220 
CNGNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35  VAX-11 Bliss-16 V4.0-579 Page 9 
GLOBAL ROUTINE - RESET_DEQNA ( ) 21-Jun-1984 08:36:19 § SPIDERSUSERS:(BERG.DEQNAJNONA4.BLI;1 (7) 


$ 
RESET THE DEVICE AND CHECK CONTENTS OF CSR FOR NOMINAL STATUS 
$ 
: 


BEGIN 


PUT_BIT ( CSR, ALL_BITS, ZERO ); 
PUT_BIT ( CSR, SR, SET_IT ); 


DELAY € TIME6_LIMIT ); 
TEMP1 = GET_BIT { CSR_ALL ] AND CSR2_MASK; 


IF .TEMP1 NEQU CSR1_STATUS 
THE 


ERR_FLAG = ONE; 
CSR_WORD = GET_BIT [( CSR_ALL ]; 
MSGS9 ); 


¢ 
PRINTB ( MSG30, .GET_ADR { CSR_ALL ], .TEMP1, CSR2_STATUS ): 
exERROF (0001, FHSGO0, “EL#REPORT 5 

» 


++ 


: 
: 
! CLEAR SOFTWARE RESET BIT IN THE CSR AND CHECK FOR EXPECTED STATUS 
: 


PUT_BIT ( CSR, SR, CLR_IT ); 

DELAY ( TIME6_LIMIT ); 

TEMP2 = GET T BIT [ CSR ALL } AND CSR2_MASK; 
IF genre NEQU CSR2_STATUS 


ERR_FLAG = 
SR_WORD = GET ‘BIT { CSR_ALL ]}; 
PRINTB ( MSGS9 ); 
PRINTB ( MSG31 ); 
PRINTB ( MSG30, .GET_ADR [ CSR_ALL ), .TEMP1, CSR2_STATUS ); 
ERRDF ( 0002, MSGOO, E1$REPORT ); 
END; 
END; 


-GLOBL LSDLY 


.SBTTL RESET.DEQNA GLOBAL ROUTINE - RESET_DEQNA ( ) 





Be 


SEO wu 
CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 yiery 10 
GLOBAL ROUTINE - RESET_DEQNA ( ) 21-Jun-1984 08:36:19 SPIDERSUSERS : [BERG . DEQNA )NQNA4 .BLI;1 (7) 
000000G RESET .DEGNA: : 
JSR R1, $SAVE2 ; 1630 
000016 SUB #16, 
MOV REG. 2RO ; 1672 
000016 MOV 16, 
ADO ° 
CLR (R2) 
000002 BISB 62,(R2) 3 1673 
000001 MOV #1,R1 3; *,$s8TMP2 1675 
1%: BEG 4$ 
000000G MOV LSOLY,RO 3 @,$$TMP] 
BEG 3$ 
000014 2s: CLR 14( SP) 3; $sTMP 
DEC Po 3 $s TMP] 
3%: DEC Ri 3 $sTMP2 
BR 1$ 
4%: MOV (R2),CSP) ; *, TMP .LOCATION 1676 
MOV (SP), TEMP: 
0:0000 000000G BIC 10000, TEMP1 
000062 a alma 3 1678 
000001 000000G MOV @1,ERR.FLAG 3 1681 
000002 MOV (SP),2¢SP) 3 *, TMP .LOCATION 1462 
000000G MOV (SP).CSR. 
000000G MOV oMSGS9, -( SP) 3 1683 
000001 MOV @1,-(SP) 
MOV SP RO 3 SP. 
TRAP 14 
000000G MOV 6MSG31,.(SP) 3 1684 
000001 MOV @1,-(SP) 
MOV SP RO ; SP .e 
TRAP 14 
000060 MOV 660 ,( SP) 3 1685 
000000G MOV TEMP1, -C SP) 
000000G 000014 MOV 6 »14( SP) ; *, TMP .LOCATION 
000016 000014 ADD #16,14(¢SP) 3 *, TMP .LOCATION 
000014 MOV 14(SP),-(SP) 3; TMP.LOCATION,« 
MOV .-CSP) 
000004 MOV 04,-(SP) 
MOV SP RO ; SP,« 
TRAP 14 
TRAP 55 $ 1686 
. WORD 1 
. WORD 
-WORD E1SREPORT 
000016 616,SP : 1680 
S$: MOV REG.ADR,RO ; 1695 
000002 000016 BICB 62,16(RO) 
1 MOV ° ; *,$$TMP2 1696 
6$: BEG GS 
000000G MOV LS$OLY,Rl 3; *,$$TMPl 


_-_— ee ee 


; Routine Size: 
; Maximum stack 


3 1710 1 


DEQNA FUNCTIONAL TEST 


CNQNAAO 
GLOBAL ROUTINE - RESET_DEQNA ( ) 


000014 


000016 
000016 


155 words, 


depth per invocation: 19 words 


7$: 


108: 


ADD 
RTS 


Ce 


12-Jul-1984 13:09:35 
21-Jun-1986 08:36:19 


#16,22(SP) 
22(SP), -CSP) 
30, -(SP) 


Routine Base: ACSCODES + 03524 


VAY -11 Bliss-16 V4.0-579 age: 
SPIDERSUSERS : (BERG. DEQNA )NONA4 .BLI;1 


$$ TMP 
$$TMP1 


$sTMP2 


¢, .MP .LOCATION 
TMP .LOCATION,« 


s o TMP -LOCAT ION 


TMP .LOCATION, 


SP,*« 


SP,« 


¢, TMP .LOCATION 


SP ,¢ 


SEQ 0222 
P 


1705 


1706 


1700 
1630 





g 


MMMUWS PHD D Bw P Wal PA & be be he be eb be bt be be be he ee pe ee 


446 
012737 


CNGNAAO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - 


VER_DESCR_STATUS ( ) 


SSBTTL ‘GLOBAL ROUTINE - VER_DESCR_STATUS ( )’ 
GLOBAL ROUTINE VER_DESCR_STATUS : NOVALUE = 


> 
> 


GLOBAL ROUTINE : 
DESCRIPTION: 


descriptor. 
INPUT PARAMETERS: 


BEGIN 


INCR INDEX FROM O TO BD_D_SIZE - 1 DO 
BEGIN 


VER_DESCR_STATUS 


TEST_NO - test number in which error occurred. 


TEMP1 = .DESCR_LIST [ .INDEX, W_LEN ]}; 
IF Cer NEQU - 1 ) AND ( .TEMP1 NEQU -BD_PROM_DESCR [ .INDEX ] ) 


‘a 
PRINTB ( MSGSO, ‘TEMPL, -8D_PROM_DESCR [ .INDEX }) , . INDEX ); 
ERRDF ( 0003, MSGOO, ERRORSREPORT ); 


VER.DESCR.STATUS GLOBAL ROUTINE - VER_DESCR_STATUS ( ) 


END; 
ENO; 

ENO; 

.SBTTL 
000000G VER .DESCR.STATUS:: 

JSR Ri, $SAVE2]) 

TST -(SP) 

CLP R2 

1%: MOV R2,R1 

ASL R1 
000000G MOV DESCR.LISTC(R1), TEMP1L 
000000G 177777 a - eggldaeeeeitianadl 
000000G 000000G Ay eaters Ren SE? 
000001 000000G MOV @1,ERR.FLAG 


VAX-11 Bliss-16 V4.0-579 Page 
SPIDERSUSERS : (BERG. DEQNA JNQNA4 .BLI; 1 


This routine comperes expected receive descriptor to actual receive 


3 
; INDEX 


; INDEX,=« 


le 
(8) 


1715 
1733 
1735 


1736 


1739 


062706 
005202 
020227 
003711 
005726 
000207 


: Routine Size: 
; Maximum stack 


; 1749 1 


DEQNA FUNCTIONAL TEST 


GLOBAL ROUTINE - VER_DESCR_STATUS ( ) 


000000G 
000016 
000000G 
000000G 
000001 


000000G 
000001 


61 words, 
depth per invocetion: 


2s: 


13 


EEE EE, 


va 


BLE 
TST 
RTS 


E2 


2-Jul-1984 13:09:35 
1-Jun-1984 08:36:19 


DESCRC(R1), -(C SP) 
SP) 


Routine Base: ACSCODES + 1012 
words 


SEQ 0224 


-11 Bliss-16 V4.0-579 


VAX Page 
SPIDER SUSERS : (BERG. DEQNA JNQNA4 .BLI;1 


*, TMP .LOCATION 
TMP .LOCATION, « 


s SP,« 

; 

3; SP,« 

; INDEX,«¢ 


13 
(8) 
1740 


1741 
1742 


1743 


1744 


1738 
1733 


1713 


Fe 


12-Jul-1984 13:09:35 


SEQ 0225 


CNQNAAO DEQNA FUNCTIONAL TEST VAX-11 Bliss-16 V4.0-579 


NQNA4S Pp 4 
v01.0 GLOBAL ROUTINE - CLR_DESCR ( ) 21-Jun-1984 08:36:19 SPIDERSUSERS : [BERG . DEQNA )NQNA4 .BLI;1 - (3) 
; 1750 1 @SBTTL ‘GLOBAL ROUTINE - CLR_DESCR ( )’ 

378 (3 
+ 3782 1 GLOBAL ROUTINE CLR_DESCR : NOVALUE = 
: 1753 1 
: 1754 1 fee 
: 1755 1 : 
8 1756 1 * GLOBAL ROUTINE : CLR_DESCR 
3 1757 i : 
; 2. : : DESCRIPTION: 
3 1 $ 
: 1760 1 : This routine initializes transmit and receive descriptor lists to 0. 
s 1761 1 $.- 
3 1762 1 
8 1763 1 
8 1764 2 BEGIN 
3 1765 2 
8 1766 2 INCR INDEX FROM O TO D_SIZE - 1 DO 
3 1767 3 IN 
3 1768 3 XMIT_D_LIST [ .INDEX, W_LEN ] = O; 
3 1769 3 RCV_D_LIST [{ .INDEX, W_LEN } = 0; 
; 1770 2 END; 
3 1771 2 
3 1772 1 END; 

-SBTTL CLR.DESCR GLOBAL ROUTINE - CLR_DESCR ( ) 
000000 005000 CLR. 2: 
RO s INDEX 1766 

000002 005060 000000G 1$: CLR XMIT.D.LISTCRO) ; *#C INDEX) 1768 
000006 005060 000000G CLR RCV .D.LISTCRO) ; *C INDEX) 1769 
000012 062700 000002 ADD @2,R0 3 *, INDEX 1766 
000016 020027 000176 CMP RO, 0176 ; INDEX,« 
000022 003767 BLE i$ 
000024 000207 RTS PC : 1752 
; Routine Size: 11 words, Routine Base: ACSCODES + 1204 


; Meximum stack 


3 1773 1 
3 1774 1 


depth per invocation: 0 


Ge 


SEQ 0226 
NQNA4 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 Page i5 
v01.0 GLOBAL ROUTINE - CLR_BUFFERS ( P1 ) 21-Jun-1984 08:36:19  SPIDERSUSERS:(BERG.DEQNAJNQNAS.BLI;i (10) 


SSBTTL ‘GLOBAL ROUTINE - CLR_BUFFERS ( Pil )’ 
GLOBAL ROUTINE CLR_BUFFERS ( P1 ) : NOVALUE = 


> 
> 


GLOBAL ROUTINE : CLR_BUFFERS 
DESCRIPTION: 

This routine initializes transmit and receive buffers to 0. 
INPUT PARAMETERS: 

Pl - number of bytes to clear. 


BEGIN 
INCR INDEX FROM O TO .P1 - 1 00 
BEGIN 


GI 
RCV_BUFFER [ .INDEX } = 0; 
XMIT_BUFFER [ .INDEX ] = 0; 
; 


DD 8 8 GE 10 10 0 ee ee be be pe be be be pe be bo be pe pe 


oF oF GF GF GF GF GF Ge Ge Ge GF GF Ge GF Ge GF GF Ge OF @F © Gr es oF OF Os Ge oe 
~ 
“4 
@ 
0 


-SBTTL CLR.BUFFERS GLOBAL ROUTINE - CLR_BUFFERS ( P1 ) 
000000 005000 CLR. .BUFFERS: : 
CLR RO ; INDEX 1796 


2s 
000004 105060 000000G i$: RCV .BUFFERCRO) *( INDEX) 1796 


CLRB $ 
000010 105060 000000G CLRB XMIT .GUFFER(RO) ; *#( INDEX) 1799 
000014 005200 INC RO 3; INDEX 
000016 020066 000002 2%: CMP RO, 2¢SP) : INDEX,P1 
000022 002770 BLT is 
000024 000207 RTS PC 3 


; Routine Size: 11 words, Routine Base: ACSCODES + 12352 
; Maximum steck depth per invocation: O words 








3 1803 1 
3 1804 1 


Se Ge Ge Ge Ge Gs Ge Ge Se GF Ge GF Ge GF GF Ge GF Ge Gt Ge Ge GS Ge Gs GF Ge GF Ge Ge Gs Ge Ge Ge GF Ge GP Gs Se Ge Ge Ge Ge Gs Oe Ge os GF Ge Ge Gs SS os oe 


FO PO RO Us Us 8 rt tt 8 109 PD Gt Gt Gt Gt PP 0 0 Gt 0 90 100 90 10 90 00 bb be be ee be be he be be ee be be be be be ee pe pe pe 


He 


SE ? 
CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 "va 16 
GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 ) 21-Jun-1984 08:36:19 SPIDERSUSERS:(BERG.DEQNAJNQNA4.8LI;1 (11) 


@SBTTL ‘GLOBAL ROUTINE - CHK_RIXI_STATUS ( Pl )’ 
GLOBAL ROUTINE CHK_RIXI_STATUS ( P1 ) : NOVALUE = 


> 
> 


GLOBAL ROUTINE : CHK _RIXI_STATUS 


DESCRIPTION: 


This routine verifies that XI ( bit 7 ) and RI ( bit 15 ) 
of the CSR stetus word are set to 1 shortly efter transmission of a 
loopbeck packet is complete. If either bit isn’t set, en error 


message is printed. 
INPUT PARAMETERS: 
P1 - O: check XI and RI 
- Il: ckeck XI 
- 2: check RI 


TEST_NO - test number in which error occurred. 


* CHECK TRANSMIT INTERRUPT REQUEST BIT ( XI - BIT 7 ) TO VERIFY THAT DEQNA 
__ ACTUALLY COMPLETED TRANSMISSION OF A LOOPBACK PACKET. 


IF ( .P1 E@UO ) ORC .P1 EGU 1 ) 
THEN 


INCR INDEX FROM O TO TIME2 LIMIT 00 
IF — { CSR, XI } EQLU ONE 


BEGIN 
TEMP1 = . INDEX; 
EXITLOOP; 
EL 
IF . INDEX EGLU TIME2 LIMIT 
THEN 
BEGIN 
ERR_FL 
CSR_WORD = GET_BIT ( CSR_ALL }; 
PRINTB ( d3 
PRINTS ( MSG29 ); 
PRINTB (€ MSG26 ); 
—" ( 0004, MSGOO, ERRORSREPORT ); 
3 


o SF Gf GF GF GF Ge GF Ge GF Ge Ge Gt Ge Ge Ge Gr Gs @e Ge Ge Se Oe Ge oe 
~ 
< 
© 
NUIT PO wi iP Po Po ft wt foto hm 


CNQNAAO DEGNA FUNCTIONAL TEST 
GLOBAL ROUTINE - CHK_RIXI_STATUS ( Pl ) 


CHECK RECEIVE INTERRUPT REQUEST BIT ( RI - B 
ACTUALLY RECEIVED TRANSMITTED LOOPBACK PACKE 


IF ¢ .P1 EQLUO ) ORC .P1 EMU 2 ) 
THEN 


INCR INDEX FROM O TO TIME2 LIMIT DO 
— { CSR, RI } EQLU ONE 


BEGIN 
TEMP2 = . INDEX; 


EXITLOOP; 


ELSE 
IF . INDEX EQLU TIME2 LIMIT 
THEN 


SBTTL CHK.RIXI.STATUS GLOBAL ROUTINE - CHK _RIXI_STATUS ( Pl ) 


le 


12-Jul-1984 13:09:35 
21-Jun-1984 06:36:19 


. 15 ) TO VERIFY THAT DEQNA 


BEGIN 
ERR_FLAG = ONE; 
CSR_ * GET_BIT ({ CSR_ALL }; 
PRINTS ( MSGS9 ); 
I MSG29 ) 
PRINTB ( MSG25 ); 
ERRDF ( 0005, » ERRORSREPORT ); 
END; 
END; 
000000G CHK .RIXI.STATUS:: 
JSR R1, $SAVES 
000010 SUB #10,SP 
000022 MOV 22(SP),R2 
CLR RS 
TST Re 
BNE 1% 
INC R3 
BR 2s 
000001 1%: CMP R2, 1 
BNE 6$ 
2s: CLR RY 
3$: MOV REG. ADR ,RO 
M0016 MOV 16(RO), (CSP) 
TST8 (SP) 
BPL 4s 
000000G a R1, TEMP1 
002000 4$: CMP R1, 02000 
BNE 5$ 
000001 MOV #1,ERR.FLAG 
000016 000002 MOV 16(RO),2CSP) 
000002 MOV 2(SP),.CSR.WORD 
000000G MOV 59, -(SP) 
000001 MOV 01, -CSP) 


VAX-11 Blies-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 


Pi.¢ 


INDEX 


e, TMP .LOCATION 
TMP .LOCATION 


INDEX, * 
INDEX, ¢ 


se, TMP -LOCATION 
TMP .LOCATION, + 


Pege 17 
(11) 


1807 
1836 


CNQNAAO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - CHK_RIXI_STATUS ( Pl ) 


000000G 
000001 


002000 9$: 


10%: 


MOV 
TRAP 


TRAP 


Je 


12-Jul-1984 15:09:35 
21-Jun-1984 06:36:19 


9$ 
R1, TEMP2 
11% 


MSGOO 
ERROR $SREPORT 
| ladaal 


i 
R1,4#2000 
8$ 


SEG i 

VAX-11 Bliss-16 V4.0-579 18 
SPIDERSUSERS : (BERG. DEQNA JNQNAG. BLI;1. mead ett 
é SP ,¢ 
; 1852 
; SP, 
$ 1853 
3 SP ,¢ 
; 1854 
H 1848 
; INDEX 1838 
4 INDEX, * 
$ 1862 
; INDEX 1864 
$ 1865 
3 «, TMP ..LOCATION 
; INDEX,*+ 1868 
$ 1867 
; INDEX,« 1872 
; 1875 
; *,TMP.LOCATION 1876 
: TMP .LOCATION, « 
; 1877 
t SP, 
; 1878 
é SP ,* 
; 1879 
‘ SP ,* 
; 1880 

1874 
; INDEX 1864 
; INDEX, * 


Ke 


SEQ 
NQNA4 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35  VAX-11 Bliss-16 V4.0-579 ae 30 
v01.0 GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 ) 21-Jun-1984 08:36:19  SPIDERSUSERS:(BERG.DEQNA)NQNA4.BLI;1 (11) 
000356 062706 000010 11$: ADD 10,SP , soins 
000362 000207 RTS = PC 


; Routine Size: 122 words, Routine Base: ACSCODE$ + 1260 
; Maximum stack depth per invocation: 14 wo 


3 1883 i 


8 Od 6d G8 G8 0 0 90. 710 10: 910 10.90 910 10 910 910 NO PD 1D ee ee be ee ee pe pe ee ee pe 


Le 


CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15:09:35 
GLOBAL ROUTINE - CHK_CSR_STATUS ( P1, P2 ) 21-Jun-1984 08:56:19 


@SBTTL ‘GLOBAL ROUTINE - CHK_CSR_STATUS ¢ Pl, Pe )' 
GLOBAL ROUTINE CHK_CSR_STATUS ( P1, P2 ) : NOVALUE = 


2 
> 


GLOBAL ROUTINE : CHK_CSR_STATUS 


DESCRIPTION: 
This routine checks CSR status words for expected status. 
INPUT PARAMETERS: 
Pl - expected CSR status 
mask 


P2 - CSR 
TEST_NO - test number in which error occurred. 


BEGIN 


See 
# SAVE CSR, RESET TRANSMIT AND RECEIVE REQUEST BITS IN THE CSR 


CSR_WORD = GET_BIT ( CSR_ALL ]; 


PUT_BIT { CSR, RI, ONE ]; 
PUT_BIT { CSR, XI, ONE J; 


TEMP1 = .CSR_WORD AND .P2; 
a NEQU .P1 


a ° ; 
PRINTB ( MSGS9 ); 
PRINTB ( MSG12, TEMP1, -P1 )s 
RRDF ( 0006, 


VAX-11 Bliss-16 V4.0-579 


SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 


SBTTL CHK.CSR.STATUS GLOBAL ROUTINE - CHK_CSR_STATUS ( Pi, P2 ) 


E | ERRORSREPORT 3 
END; 
END; 
000000G CHK. .CSR.STATUS:: 
MOV REG.ADR,RO 
000016 #16,R0 
MOV (RO), -CSP) 
MOV (SP),CSR.WORD 
100200 BIs #100200, (RO) 
000000G MOV (SP), TEMP1 
000004 MOV a(sP), RO 


é 
; *,TMP.LOCATION 


: 
; CSR.WORD,* 
3 P2, 


SEQ 0231 
Page 20 
(12) 


1910 


1915 
1915 


CNGQNAAO DEQGNA FUNCTIONAL TEST 
GLOBAL ROUTINE - CHK_CSR_STATUS ( Pl, P2 ) 21-Jun-1984 08:36:19 


; Routine Size: 
; Maximum stack depth per invocation: 


M2 


12-Jul-1984 13:09:35 


RO 
RO, TEMP1 
_nwe 


Routine Base: ACSCODE$ + 1644 
rds 


VAX-11 Bliss-16 V4.0-579 P 
SPIDER SUSERS : (BERG . DEGNA JNQNA4 .BLI;1 


; *,P1 


SEQ 0232 
age el 
(12) 


1917 


1920 
1921 


1922 


1923 


1919 
1886 


PO 19 F090 90 19.710 70 10 910 10: 10 10 20 G8 G8 hd Gd Gt Gr 0 0 90 90 10 90 1 PO PE PD 10 Fk ep pe ee 


Ne 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15:09:35 VAX-11 Bliss-16 V4.0-579 
GLOBAL ROUTINE - CHK_XMIT_STATUS ( Pl, P2 ) 21-Jun-1984 08:36:19 SPIDERSUSERS : [BERG . DEQNA JNQNA4 ,BLI;1 


SSBTTL ‘GLOBAL ROUTINE - CHK_XMIT_STATUS ( Pl, Pe )' 
GLOBAL ROUTINE CHK_XMIT_STATUS ( P1, P2 ) : NOVALUE = 


> 
> 


GLOBAL ROUTINE : CHK _XMIT_STATUS 
DESCRIPTION: 

This routine checks transmit status words for expected status. 
INPUT PARAMETERS: 

Pl - XMIT flag word 


P2 - expected d XHIT status word 1 
TEST_NO - test number “- which error occurred. 


BEGIN 


* 
- 


MASK OUT DON’T CARE BITS IN THE XMIT FLAG WORD AND COMPARE TO EXPECTED 
= STATUS. IF STATUS NOT EQUAL THEN PRINT ‘BAD XMIT FLAG WORD 


TEMP2 = .XMIT_D_LIST { FLGWD ] AND XFLG_MASK; ! 0'140000' 
IF .TEMP2 NEQU .P1 
THE 


N 
BEGIN 
ERR_FLAG = ONE; 
CSR_WORD = GET_BIT [ CSR_ALL ]; 
PRINTB ( MSG59 ); 
PRINTB ( MSGi3, ‘ TEMP2, XFLG_MASK ); 
-_— ( 0007, MSGOO, ERRORSREPORT ); 
: 


* 


MASK OUT DON’T CARE BITS IN THE XMIT STATUS WO1 AND COMPARE TO EXPECTED 
_ war STATUS WD1. IF STATUS NOT EQUAL THEN PRINT ‘BAD XMIT STATUS WORD 1' 


IF .XMIT_D_LIST { STWD1 J GTRU ZERO 
THEN 


‘ + a = .XMIT_D_LIST { STWD1 ] AND XWD1_MASK ! 0'157760' 
L 
TEMPS = .XMIT_D_LIST ({ STWD1 ) AND X1_MASK; ! 0' 100000‘ 


IF .TEMP3S NEQU .P2 





SEQ 0233 
Page 22 
(13) 


— 
So 
~ 
°o 


3 
Nh Ul a 


024646 
013737 


DEQNA FUNCTIONAL 


CNQNAAO TEST 
GLOBAL ROUTINE - CHK_XMIT_STATUS ( Pl, P2 ) 


THEN 


ERR_FLAG = ONE; 
CSR_WORD 









PRINTS ( MSG14, 
ERROF ( 0006, 
END; 





000000G 000000G 
037777 000000G 
000000G 000010 


PRINTB ( MSGS9 ) 


= GET_BIT { CSR_ALL }; 


° 
TEMPS, .P2 ); 
MSGOO, ERRORSREPORT ); 


-SBTTL CHK. XMIT.STATUS GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 ) 


BS 


CHK. XMIT.STATUS:: 
CMP -( 58), -¢€SP) 
MOV am%ii.O.LIST, TEMP2 
BIC 637777, TEMP? 
CMP TEMP2,10( SP ) 
BEG i$ 
MOV @1,ERR.FLAG 
MOV G.ADR 
MOV 16(RO)., CSP) 
MOV ),CSR. 
MOV = 
MOV @1,-(SP) 
MOV SP,RO 
TRAP 14 
MOV @-40000,( SP) 
MOV TEMP2, -C SP) 
MOV 13,-CSP) 
MOV @3,-(SP) 
MOV SP,RO 
TRAP As 
TRAP 55 
-WORD 7 
-WORD MSGOO 
-WORD ERRORSREPORT 
ADD 612,SP 
1$: MOV XMIT.D.LIST+10,R0 
BEQ oh 
MCV RO, TEMPS 
BIC #20017, TEMP3 
BR 3$ 
BIC 077777, TEMPS 
3$: CMP TEMPS ,6( SP ) 
BEQ 4$ 
MOV #1,ERR.FLAG 
MOV REG. ADR ,RO 
MOV 16(RO).2¢SP ) 
MOV 2(SP),CSR.WORD 
MOV @MSG59, -C SP) 


12-Jul-1984 15:09:35 
21-Jun-1984 08:36:19 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 


a,Pl 


«, TMP .LOCATION 
TMP .LOCATION, ¢ 


SP, 


SP, 


«, TMP .LOCATION 
TMP .LOCATION, « 


SEQ 0234 
Pege 23 
(13) 


2626 
000207 
: Routine Size: 
; Meximum stack 


s 1991 1 
3 1992 i 





CNQNAAO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 ) 


000012 
000000G 
000000G 
000003 


000012 


95 words, : 
depth per invocation: 


4$: 


MSGOO 

ERROR $REPORT 
012,SP 
(SP)+,CSP)+ 
PC 


Routine Base: ACSCODES + 2002 
9 words 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 


Py SP ,« 
3; P2,« 


: SP ,¢ 





SEQ 0235 
Pege 24 
(13) 


1986 


1987 


1982 
1930 


= 


AP AD FORD RD A 0 10 90 90 0 70 10 90 0 6 Gt rd rd rt 2 90 10 1 19 10 10. 19 010 10 10 10 00 & be ee ee ee ee pe ee pe be pe 





D3 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 
GLOBAL ROUTINE - CHK_RCV_STATUS ( P1, P2 ) 21-Jun-1984 


SSBTTL ‘GLOBAL ROUTINE - CHK_RCV_STATUS ( Pl, P2 )' 
GLOBAL ROUTINE CHK_RCV_STATUS ( Pi, P2 ) : NOVALUE = 


13:09:53 
08: 36:1 


> 
> 


GLOBAL ROUTINE : CHK _RCV_STATUS 


DESCRIPTION: 

This routine checks receive stetus words for expected status. 
INPUT PARAMETERS: 

Pi - expected RCV fleg word 


P2 - expecteo RCV status word 1 
TEST_NO - test number in which error occurred. 


m 
o 
~ 
at 


> 
o 


MASK OUT DON'T CARE BITS IN THE RCV FLAG WORD AND COMPARE TO EXPECTED 
ane STATUS. IF STATUS NOT EQUAL THEN PRINT ‘BAD RCV FLAG WORD 


TEMP1 = .RCV_D_LIST [ FLGWD ) AND RFLG_MASK; ! 0' 140000’ 
IF .TEMP1 NEQU .P1 
THEN 
BEGIN 
ERR_FLAG = ONE; 
CSR"WORD = GET BIT ( CSR_ALL Fe 
PRINTB ( MSGS9 ); 
PRINTS ( MSGi5, . a RFLG_MASK ); 
— ( 0009, ERRORSREPORT ); 
‘ 


t 
$ MASK OUT DON’T CARE BITS IN THE RCV STATUS WD1 AND COMPARE TO EXPECTED 
: RCV STATUS WDO1. IF STATUS NO” EQUAL THEN PRINT ‘BAD RCV STATUS WORD 1° 
IF we { STWO1 ) GEQU ZERO 

Date » ,RCV_D_LIST ( STWDO1 ) AND R2_MASK 

TEMP2 = .RCV_D_LIST { STWO1 ] AND .P2; 

IF ,TEMP2 NEQU .P2 

THEN 


§ 0'174017' 


5 VAX-11 Bliss-16 V4.0-579 Pp 
:19 SPIDERSUSERS : [BERG.DEQNA JNQNA4 .BLI;1 


NN WwW 


024646 


CNQNAAO DEQNA FUNCTIONAL TEST 


GLOBAL ROUTINE - CHK_RCV_STATUS ( Pl, P2 ) 


I 
ERR_FLAG = 


ONE ; 
CSR_WORD = GET_ a { CSR_ALL }; 


PRINTS ( MSGS9 


PRINTB ( MSG16, .TEMP2, .P2 ) 


ERRDF ( 0010, 


END; 
END; 


000012 
000000G 


‘ 
MSGOO, ERRORSREPORT 


TTL CHK.RCV.STATUS GLOBAL ROUTINE - 


. SB 
CHK RCV. STATUS: 


MOV 
BIC 
CMP 


ADD 
1%: MOV 
MOV 


ES 


12-Jul-1984 13:09:35 
21-Jun-1984 08:36:19 


):3 


-(SP), 


-(SP) 
RCV.D. Ae TEMP 1 
TEMP 


037777 
TEMP1, 10(SP) 


#12,SP 
RCV.0.LIST+10,RO0 
TEMP2 


03760, TEMP2 
TEMP2,6(SP) 


2$ 
#1,ERR.FLAG 
REG. ADR ,RO 
16(RO),2¢SP) 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 


CHK _RCV_STATUS ( Pl, P2 


+,P1 


«, TMP .LOCATION 
TMP .LOCATION, « 


SP ,*« 


*,P2 


«, TMP .LOCATION 
TMP .LOCATION, 


SP,* 
P2,¢ 





SEQ Bd 
Pege 26 
(14) 


1995 
2021 
2023 
2026 
2027 


2028 


2029 


ra 


NQNA4 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 
v0O1.0 GLOBAL ROUTINE - CHK_RCV_STATUS ( Pl, Pe ) 21-Jun-1984 08:36:19 
000230 012746 000003 MOV @3,-CSP) 
000234 010600 MOV SP RO 
000236 104414 TRAP 14 
104455 TRAP 55 
000242 000012 -WORD 12 
000244 .WORD M™SGOO 
000246 ‘ -WORD ERRORSREPORT 
000250 062706 000012 ADD $12,SP 
000254 02 2s: CMP (SP)+,(CSP)+ 
000256 RTS PC 
:; Routine Size: 88 words, Routine Base: ACSCODE$ + 2300 


; Maximum stack depth per invocation: 


55 ae i 


9 words 


SEG — 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNA4, BLIi1 


. SP,« 


27 
e184) 
2051 


1995 


< 
a: 
~ 


SUSSRRERR ERROR URGE 


OF GP G2 GS GF GF Ge Ge GE Ge GF GF Ge GF Ge Ge GF Gs GF GS GS Ge Gs GF GS Ge GE GF Ge Ge GS Ge GE Ge Ge Ge Ge GS Ge GF Ge Ge Ge Ge Gs Oo Ge Ge Ge GS Ge Ge oe 
tw Ut tt 8 8 rt 8 0 0 0 Gt rt 0 90. 0 0 FR G0 10. 90 10 10. 10 10 10 10. 10 10 10 179 ND 8 be ee be be ee ee ee 


2074 


CNQNAAO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - 


e 
- 


BEGIN 


**e 


TEMPS = 0; 
IF —" { CSR, LB ) GTRU ZERO 
TEMPS = .RCV_D_LIST { STWD1 ] AND RHL_MASK; 
ys -CSR_WORD AND #0'01' ) EQLU ZERO 
an = .TEMPS + ( .RCV_O_LIST { STWD2 ] AND RLL_MASK ) £ 0'000377' 


IF . TEMPS NEQU .RBUF _LENGTH 
THEN 





INCR INDEX FROM O TO .TEMPS - 1 DO 
OTF -RCV_O_LIST { STWO1 ) EQLU NEW 
RCV_BUFFER [ . INDEX } = ZERO; 
7 a ore { . INDEX } NEQU .RCV_BUFFER { .INDEX ] 
IF .RCV_O_LIST { LONGP } EQLU ONE 
THEN 


COMPARE PACKETS ( ) 

SSBTTL ‘GLOBAL ROUTINE - COMPARE PACKETS ( )' 
GLOBAL ROUTINE COMPARE _PACKETS : NOVALUE = 
GLOBAL ROUTINE : COMPARE _PACKETS 


DESCRIPTION: 


This routine comperes contents of transmit packet to the contents 
of receive packet end prints an error message if the don't compare. 


ONE ; 
ant OST { CSR_ALL }; 


INTB ¢ 
PRINTS ( MSG17, .TEMPS, .RBUF _L 
ERROF ( 0011, MSGOO, ERRORS 


GS 


SEQ 0239 


12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 P 
21-Jun-1984 08:36:19 SPIDERS USERS : (BERG . DEQNA JNONA4 .BLI; 1 


GET RECEIVE BYTE LENGTH ( RBL ) FROM RCV DISCRIPTOR AND COMPUTE WORD 
LENGTH. THEN COMPARE ACTUAL TO EXPECTED RCV WORD LENGTH. 


£ 0°003400' 


age 26 
(15) 


ee 


H5 





NONAS CNQ@NAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35  VAX-11 Bliss-16 V4.0-579 a 29 
v01.0 GLOBAL ROUTINE - COMPARE PACKETS ( ) 21-Jun-1984 08:36:19 SPIDER SUSERS : [BERG.DEQNA JNQNAG .BLI;1 (15) 
; 2109 4 BEGIN 
: 2110 4 TEMPS = . INDEX; 
8 2111 4 EXITLOOP; 
; ell2 4 END 
s esis 3 ELSE 
; 2114 4 BEGIN 
; 2115 4 ERR_FLAG = ONE; 
; 2116 4 CSR_WORD = GET_BI*® { CSR_ALL ]}; 
; 2117 4 PRINTS ( MSGS9 ); 
: 2118 4 PRINTB ( MSGS5S1 ); 
; e119 4 PRINTS ( MSGSO, .RCV_BUFFER [{ .INDEX ], .XMIT_BUFFER [ .INDEX ], .INDEX ); 
— 4 ERROF ( 0012, MSGOO, ERRORSREPORT ); 
: 2i21 53 END; 
8 2122 2 END; 
s Gene & END; 

-SBTTL COMPARE.PACKETS GLOBAL ROUTINE - COMPARE_PACKETS ( ) 
000000 004137 000000G COMPARE .PACKETS: : 

JSR R1, $SAVE2] $ 2058 
000004 024646 CMP -(SP),-(€SP) 
000006 37 000000G TEMPS : 2077 
000012 013700 000000G REG. ADR ,RO : 2079 
000016 Ol 000016 16(RO), -C SP) s *,TMP.LOCATION 
000022 oars 001400 re * ; @, TMP .LOCATION 
000030 013737 RCV.D0.LIST+10, TEMPS 3 2081 
000036 042737 174377 000000G 0174377, TEMPS 
000044 032737 1%: #1,CSR.WORD 3 2083 
000052 1 2s 
000054 Ri 3 2085 
000056 153701 000012G RCV.O.LIST+12,R1 
000062 137 000000G ADD R1, TEMPS 
000066 BR 3% : 2083 
000070 012737 000006 000000G 2%: MOV 66, TEMPS : 2087 
000076 023737 000000G 000000G 3%: CMP TEMPS .RBUF .LENGTH 2089 
000104 001437 BEQ 4$ 
000106 012737 000001 MOV 41,ERR.FLAG : 2092 
000114 Ol 000016 000002 MOV 16(RO), 2(SP) ; #, TMP.LOCATION 2093 
000130 012746 MOV 59, -(SP) 3 2094 
000134 012746 000001 MOV #1,-(SP) 
000140 010600 MOV ° ; SP, 
000142 104414 TRAP 14 
000144 013716 000000G MOV RBUF .LENGTH,( SP) ; 2095 
000150 013746 000000G MOV TEMPS, -( SP) 
000154 012746 MOV OMSG17, -( SP) 
000160 012746 000003 MOV 63, -(SP) 
000164 Oil MOV SP RO ; SP, 
000166 104414 TRAP 14 
000170 104455 TRAP 55 : 2096 
000172 000013 WORD 13 
000174 WORD ™SGOO 


; Routine Size: 
; Meximum stack 


CNQNAAO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - COMPARE PACKETS ( ) 


000012 
0000C90G 


000016 


000006 


135 words, 


“ 


3838288928289 


~4 
Ps 
% 


EEE 


3 
< 


gggacee 


55538 


potas 


3 


12-Jul-1984 13:09:35 
21-Jun-1984 08:36:19 


9% 
 naeacilieacaaiiee 


RCV. BUFFERCR1) 


XMIT .BUFFERCR1),.RCV.BUFFERCR1) 


8$ 
«ene icaameamammeatliiaa 


14 
R1,(SP) 
-(SP) 
XMIT.BUFFERCR1), (SP) 
RCV. .BUFFER(CR1), (SP) 
6MSGS5O, -( SP) 
o4, -(SP) 

RO 


Routine Base: ACSCODES + 2560 
depth per invocation: ds 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : (BERG . DEQNA JNQNA4 .BLI; 1 


: INDEX 

; *#C INDEX) 

s *C INDEX), «C INDEX) 
INDEX, 


+, TMP .LOCATION 
TMP .LOCATION, « 


; SP, 
; SP, 
$ INDEX, + 


5 #( INDEX),+« 
‘ #( INDEX), « 


; SP, 


INDEX 
INDEX, # 


SEG 0241 
Page 430 
(15) 


2091 
2099 


os 
o 
~ 
o 


; Routine Size: 


7 oF SF OF SF GF GF Ge GF Ge GF GF GF GF GF GF GF Ge GH Ge Gs GH OF Ge Ge oe Ge Os Gs os os 
~ 
~~ 
> 
~ 


PONG 10 00 19 19 10 10 19 10 NO be ee be be be be be be be be be pe 


012737 


J3 


CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 
GLOBAL ROUTINE - SET_RDESCR_LIST ( Pi, P2) 21-Jun-1984 08:36:19 


SSBTTL ‘GLOBAL ROUTINE - SET_RDESCR_LIST ( Pl, P2)’ 
GLOBAL ROUTINE SET_RDESCR_LIST ( Pl, P2 ) : NOVALUE = 
tee 
GLOBAL ROUTINE : SET_RDESCR_LIST 
DESCRIPTION: 

This routine initializes receive descriptor list. 
INPUT PARAMETERS: 


Pl - expected Ethernet packet length in words 
P2 - expected RCV Descriptor List settings 


BEGIN 
RCV_D_LIST { FLGWD ] = NEWB; 
RCV_O_LIST { OBITS }) = .P2; 
RCV_DO_LIST ({ L ) = RCV_BUFFER; 
RCv_D_LIST [{ T }) = .Pi; 
RCV_O_LIST { STWO1 }) = 0; 
RCV_D_LIST { STWO2 ) = 0; 
RCV_D_LIST { DLINK ] = V; 
RCV_D_LIST { BSTAT } = E; 

END; 


TTL SET.RDESCR.LIST GLOBAL ROUTINE - SET_RDESCR_LIST ( Pl, P2) 


. SB 
SET.RDESCR. preris 
MOV #-100000 ,.RCV.0.LIST 
2(SP),RCV.D.LIST+2 
= ORCV .BUFFER.RCV.D.LIST+4 


4(SP),RCV.0.LIST+6 
000010G CLR .D.LIST+10 
000012G CLR RCV.O.LIST+1i2 
100000 000014G MOV @-100000 ,.RCV.D.LIST+14 


MOV #20000, RCV.0.LIST+16 
RTS PC 


23 words, Routine Base: ACSCODE$ + 3176 


; Maximum stack depth per invocation: O words 


3 2157 i 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG. DEQNA JNQNAG . BLI;1. 


P2,# 
Pi,« 


31 
016) 


KS 


4 
DEQNA FUNCTIONAL TEST 42-Jul-1984 13:09:35  VAX-11 Bliss-16 V4.0-579 a” a 
984 08:36:19  SPIDERSUSERS:(BERG.DEQNAIJNGNA4.BLI;1 — (17) 


NQNA4 CNQNAAO 
vo1.0 GLOBAL ROUTINE - SET_XDESCR_LIST ( Pl, P2 ) 21-Jun-1 






w 
7 
~“ 
wi 
POT 191090 90 1090 1010 10 ee be be ee pe pe 


; Routine Size: 
; Maximum steck depth per invocation: O words 


2189 1 


SSBTTL ‘GLOBAL ROUTINE - SET_XDESCR_LIST ( Pl, P2 )° 
GLOBAL ROUTINE SET_XDESCR_LIST ( P1, P2 ) : NOVALUE = 


> 
> 


GLOBAL ROUTINE : SET_XDESCR_LIST 
DESCRIPTION: 

This routine initializes transmit descriptor list. 
INPUT PARAMETERS: 


Pl - expected Ethernet packet length in words 
P2 - expected XMIT Descriptor List settings 


-SBTTL SET.XDESCR.LIST GLOBAL ROUTINE - SET_XDESCR_LIST ( Pl, Pe ) 


BEGIN 

XMIT_D_LIST ({ FLGWD ) = NEWB; 

XMIT_D_LIST { DBITS ] = .P2; 

XMIT_D_LIST [ LOADR )] = XMIT_BUFFER; 

XMIT_O_LIST { TWOL ) = .P1; 

XMIT_D_LIST ( STWD1 ) = O; 

XMIT_D_LIST { STWD2 } = 0; 

XMIT_D_LIST [ INK ] = V; 

XMIT_D_LIST { BSTAT } = E; 
END; 
100000 000000G SET. XDESCR. LIST:: 

MOV #-100000,XMIT.O.LIST 
000002 000002G MOV 2(SP). XMIT. D.LIST+¢2 
000000G 000004G MOV @XMIT.BUFFER , XMIT _eer es 
000004 000006G MOV 4(SP), xXMIT. D. LIST +6 
000010G CLR XMIT. D. LIST+10 
000012G CLR XMIT.D.LIST+12 
100000 000014G MOV #-100000 ,XMIT.O.LIST+14 
020000 000016G MOV #20000, XMIT.D.LIST+16 
RTS PC 
23 words, Routine Base: ACSCODES + 3254 


P2,¢ 
Pi1,« 


< 
ee 
~ 
°o 


WO Ot OI Ot Ot 8 Gt Gt td Gd Gd Gt BR 0 0 0. 0 0 910. 90 19. 910 10 90 10 1 bb be ee ee be be ee ee ee ee be ee pe pe pe pe 


GLOBAL ROUTINE WALKING _BIT ( P1, P2, P53 ) 


See 


BEGIN 


CNQNAAO DEGNA FUNCTIONAL T 
GLOBAL ROUTINE - WALKING_ BIT vi Pi, P2, P3 ) 


SSBTTL ‘GLOBAL ROUTINE - WALKING _BIT ( P1, P2, PS )' 


GLOBAL ROUTINE : 
DESCRIPTION: 


This routine sets bit to 0 or 1 in e specified bit position of the 
Ethernet Station Address. For example, 


if 
then 


WALKING _BIT 


-P1 = 0 and .P2 = 15 
Ethernet Station Address 


INPUT PARAMETERS: 


Pl - bit ( O or 1 ) 
P2 - bit position from base address 
P3 - @ of bytes to be tested using this pattern 


—_ -P2 OF 


SE 

{[ 0T0 7 as, 

{[ €TOC .P3 + 1 
TE 


TES; 
TEMP2 = 


1 = O; 
>«8): 
MP1 = .P2 / &; 


-P2 MOD 8; 
IF .Pi EQLU ZERO 
THEN 


BEGIN 
TBYTE1 = #8'‘00000000' ; 


SELEC TONE 
SE 


o- 


eet teed teed Semel Somat tend teed te nd 


f 


WNIOUSwtr 


oa To ame Keun Lame Kame hewn Kanes) 


.TEMP2 OF 

TBYTE2 = #0'001'; 
TBYTE2 = #80'002'; 
TBYTE2 = #0'004'; 
TBYTE2 = #0'010'; 
TBYTE2 = #0'020'; 
TBYTE2 = #80'040'; 
TBYTE2 = #0'100' ; 
TBYTE2 = #0'200'; 


to 
43 
$3 


21- dae 1 


: NOVALUE = 


.P3 = 5 


FF -FF -FF -FF -7F -FF 


VAX-11 Bliss-16 V4.0-579 Pp 
SPIDERSUSERS : (BERG. DEQNA JNOQNAG .BLI;1 


CNGNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 = ~ my 34 

v0i1.0 GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 ) 21-Jun-1984 08:36:19 SPIDERSUSERS : (BERG. DEQNA JNQNA4 .BLI;1 (18) 
; 2243 3 END 
: 2244 2 ELSE 
; 2245 3 BEGIN 
: 2246 3 TSYTE1L = #8'11111111'; 
: 2247 3 SELECTONE .TEMP2 OF 
3 2248 3 SET 
3 2249 3 { 0 ds TBYTE2 = #0'376'; 
s ase 3s {1 ]: TBYTE2 = £0'375'; 
; 2251 3 {2 ]: TBYTE2 = #£0'373'; 
: 2252 3 { 3]: TBYTE2 = #0'367'; 
; 2253 3 { 4): TBYTE2 = #0'357'; 
; 2254 3 {5 ]: TBYTE2 = #0'337'; 
; 2255 3 {6 ): TBYTE2 = #0'277'; 
; 2256 3 { 7]: TBYTE2 = #0'177'; 
: 2257 3 TES; 
’ 2258 2 END; 
3 2259 2 
; 2260 2 INCR INDEX FROM O TO .P3 DO 
; 2261 2 TARGET_ADR [{ .INDEX ) = .TBYTE1; 
8 2262 2 
3 2263 2 TEMPS = .P3 - .TEMP1; 
3 2264 2 TARGET_ ADR [ "TEMPS. ] = .TBYTE2; 
3 2265 2 
3 2266 1 END; 

-SBTTL WALKING.BIT GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 ) 
000000 010146 WALKING .BIT:: 

MOV R1,-(SP) : 2192 
000002 016601 000006 MOV 6(SP),R1 ; P2,* 2218 
000006 002406 BLT i$ : 2220 
000010 020127 000007 CMP R1,07 
000014 003003 BGT 1$ 
000016 005037 000000G CLR TEMP1 : 2221 
000022 000424 BR : 2218 
000024 020127 000010 1$: CMP R1,#10 : 2222 
000030 002421 BLT 2$ 
000032 016600 000004 MOV 4(SP),RO ; P3,* 
000036 006300 ASL RO 
000040 006300 ASL RO 
000042 006 ASL 
000044 062700 000010 ADD #10,RO0 
000050 020100 CMP Ri, 
000052 003010 BGT 2s 
000054 010146 MOV R1,-CSP) : 2223 | 
000056 746 000010 MOV #10,-(SP) 
000062 004737 000000G JSR PC ,.BLSDIV 
000066 010037 000000G MOV RO, TEMP1 
000072 022626 CMP (SP)+,CSP)+ 
000074 010146 2$: MOV R1,-(SP) ; 2226 
000076 012746 000010 MOV #10,-CSP) 
000102 004737 JSR PC ,BL$M0D 


000106 010037 000000G MOV RO, TEMP2 


CNQNAAO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 ) 


000014 


33: 


4$: 


5$: 


6$: 


7$: 


9$: 


10$: 


11%: 


12$: 


13$: 


14$: 


TST 


MOV 


37SKe SMe ome Shoe ome ome 


NS 


12-Jul-1984 13:09:35 
21-Jun-1984 08:36:19 


3$ 

#1, TBYTE2] 
18% 

RO, #1 

as 

#2, TBYTE2 
18$ 

RO, #2 

S$ 

64, TBYTE2 
18$ 

RO, #3 

6$ 

#10, TBYTE2 
18$ 

RO, #4 

7$ 

#20, TBYTE2 
18$ 

RO,#5 

8$ 

#40, TBYTE2 
18$ 

9$ 

#100, TBYTE2 
18% 

RO, @7 

18$ 

— 
0377, TBYTE1 
RO 

11$ 

#376, TBYTE2 
18% 

RO, #1 

i2$ 

$375, TBYTE2 
18$ 

RO, #2 

13$ 

#373, TBYTE2 
18$ 

RO, #3 

14% 

0367, TBYTE2 
18$ 

RO, 04 


VAX-11 Bliss-16 V4.0-579 


SEQ 0246 
Page 


35 
SPIDERSUSERS : [BERG . DEQNA JNQNAG .BLI; 1 (18) 


; Pl 


2228 
2231 
2234 


2232 
2235 


2232 
2236 


2232 
2237 


2232 
2238 


2232 
2239 


2232 
2240 





SEG omer 

NQNA4S CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 
v01.0 GLOBAL ROUTINE - WALKING BIT ( Pi, P2, PS ) 21-Jun-1984 08:36:19 SPIDERSUSERS : [BERG . DEQNA )NQNA4. BLI;1, ef 
000402 001004 BNE 
000404 012737 000357 000000G MOV 6357, TBYTE2 
000412 000424 BR ’ 2247 
000414 020027 000005 iS$: CMP RO,o5 | 3 2254 
000420 001004 BNE 16% 
000422 012737 000337 000000G MOV 6337, 1TBYTE2 
000430 000415 BR 18% : 2247 
000432 020027 000006 16$: CMP RO, 06 : 2255 
0006436 001004 BNE 173 

012737 000277 000000G MOV 0277, TBYTE2 
000446 000406 BR 18$ : 2247 
000450 020027 000007 17$: CMP RO, 07 ; 2256 
000454 001003 BNE 18% 
000456 012737 000177 000000G MOV 0177, TBYTE2 
000464 005000 18%; CLR RO ; INDEX 2260 
000466 BR 20% 
000470 113760 0090000G 000000G 19$: MOVB TBYTE1, TARGET .ADR(RO) 3 *,*#C INDEX) 2261 
000476 INC RO ; INDEX 2260 

000010 208: CMP RO,10( SP) ; INDEX,?3 

003771 BLE 19% 
006596 016637 000010 000000G MOV 10( SP), TEMPS ; P3,« 2263 
000514 163737 SUB TEMP 1, TEMPS 
000522 013700 000000G MOV TEMP3,RO 3 2264 

113760 000000G 000000G MOVB TBYTE2, TARGET. ADRCRO) 
000534 022626 CMP (SP)+.CSP)- ; 2216 
000536 012601 MOV (SP)+,R1 ; 2192 
000540 000207 RTS PC 
s Routine Size: 177 words, Routine Base: ACSCODES + 3332 


; Maximum steck depth per invocetion: 4 words 


; 2267 1 


> A TT 


PD 8 8 8D 0 8 8 Gd 90 1D 0 10 19.910 10. 910 10 10 10 10 1010 00 bb i be ee be be he be be ee be ee 





— ee 
- 


SEQ 0248 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1 VAX-11 Bliss-16 V4.0-579 


GLOBAL ROUTINE - WRT_STATION_ADR ( P1, P2 ) 21-Jun-1 
SSBTTL ‘GLOBAL ROUTINE - WRT_STATION_ADR ( Pl, P2 )’ 
GLOBAL ROUTINE WRT_STATION_ADR ( P1, P2 ): NOVALUE = 


$3 
#3 


> 
> 


GLOBAL ROUTINE : WRT _STATION_ADR 
DESCRIPTION: 

This routine writes Station Address to XMIT_BUFFER. 
INPUT PARAMETERS: 


Pi - Ethernet Station Address index (1:14) in Station Address RAM 
P2 - Ethernet Station Address index ( 0:19 ) in the TARGET_ADR table 


BEGIN 
TEMP1 = .P2 * 6; 
SELECTONE .P1 OF 
SET 
{ 0T0 7]: 
{ 8170 14}: 
TES; 
IF .TEMP2 EQGLU ZERO 
THEN 
a FROM O TO 5 DO 
a ene { . INDEX }) = .TARGET_ADR { .INDEX + .TEMP1 }; 


ELSE 
INCR INDEX FROM O TO 5S DO 
BEGIN 


TEMPS = .INDEX « 6 « . TEMP2; 
XMIT “BUFFER g TEMPS ) = .TARGET_ADR [ .INDEX « .TEMP1 }; 


TEMP2 = .Pl; 
TEMP2 = .Pl1 «+ 57; 


END; 
END; 
.SBTTL WRT.STATION.ACR GLOBAL ROUTINE - WRT_STATION_ADR ¢ Pl, P2 ) 
000000G WRT, STATION. ADR: : 
JSR R1, $SAVES : 
000012 MOV 12(SP),-(SP) ; P2,¢ 
000006 MOV 06, -(SP) 
000000G JSR PC BL $MUL 
000000G MOV RO, TEMP1 


: Pp 
:19 SPIDERSUSERS : [BERG . DEQNA JNQNA4.BLI;1 


ege 57 
£19) 


2270 
2289 





D4 


NQNA4S CNQNAAO DEQGNA FUNCTIONAL TEST 12-Jul-1964 13:09:35 VAX-11 Bliss-16 V4.0-579 — ay 38 
v01.0 GLOBAL ROUTINE - WRT_STATION_ADR ( Pi, P2 ) 21-Jun-1984 08:36:19 SPIDER SUSERS : [BERG . DEQNA JNQNA4 .BLI;1 (19) 
000024 016600 000020 MOV 20(SP),RO ; Pl,« 2291 
000030 002406 BLT 1$ $ 3 2293 
000032 020027 000007 CMP RO, 07 

000036 003003 BGT 1$ 

000040 010037 000000G MOV RO, TEMP2 : 2294 
000044 000415 BR es : 2291 
000046 020027 000010 1%: CMP RO, @10 ; 2295 
6900052 002410 BLT es 

000054 90 7 000016 RO,016 

000060 BGT 

000062 0100357 MOV RO, TEMP2 ; 2296 
000066 062737 000071 000000G ADD 071, TEMP2 

000074 013703 000000G 2s: MOV TEMP2 ,R3 : 2299 
000100 001014 BNE 4$ 

000102 005000 CLR RO ; INDEX 2301 
000104 010001 3$: MOV RO,R1 ; INDEX,+ 2303 
000106 063701 000000G ADD TEMP1,.R 

000112 116160 000000G 000000G MOVB TARGET. ADRCR1).XMIT. BUFFERC(RO) ; #,#C INDEX) 

000120 005200 INC RO ; INDEX 2301 
000122 020027 000005 CMP RO,05 ; INDEX,« 

000126 005766 BLE 3% 

000130 000422 BR 6$ 3 2299 
000132 005002 4$: CLR R2 ; INDEX 2306 
000134 010200 S$: MOV R2,RO0 ; INDEX,« 2308 
000136 006300 ASL RO 

000140 006500 ASL RO 

000142 006300 ASL 

000144 0603500 ADD R3,RO 

000146 010037 000000G MOV RO, TEMPS 

000152 010201 MOV R2,R1 ; INDEX,¢ 2309 
000154 063701 000000G ADD TEMP1,R1 

000160 116160 000000G 000000G MOVB TARGET. ADR(R1), XMIT .BUFFERCRO) 

000166 005202 INC R2 ; INDEX 2306 
000170 020227 000005 CMP R2,05 ; INDEX, 

000174 003757 BLE S$ 

000176 022626 6%: CMP (SP )+,(SP)« : 2287 
000200 000207 RTS PC ; 2270 
; Routine Size: 65 words, Routine Base: ACSCODES + 4074 


; Maximum stack depth per invocation: 7 words 


3 23i2 1 


oF oF SF Ge SF GF GF GF GF GF St GF Gt Ge GF GF Gt St Ge Gr SF GF Ge GF Gt GF oF GF Gs Ge Ge Ge OF Oe os oe 
a) 
ws 
One 
~ 


P10 10 10 G8 G8 GE 0 10 10 10 10 10 10 1D be be ee be be be ee pe pe he 


010146 





E4 


SEQ 0250 


CNQNAAO DEGNA FUNCTIONAL TEST VAX-11 Bliss-16 V4.0-579 


GLOBAL ROUTINE - PREP_FOR_SETUP ( ) 
SSBTTL ‘GLOBAL ROUTINE - PREP_FOR_SETUP ( ) ° 
GLOBAL ROUTINE PREP_FOR_SETUP : NOVALUE = 


12-Jul-1984 15 
964 


:09:35 
21-Jun-1 08:36:19 


> 
> 


GLOBAL ROUTINE : PREP _FOR_SETUP 


DESCRIPTION: 
This routine retrives Ethernet Station Address from the Ethernet's 
Station Address PROM, saves copy of Ethernet Station Address PROM 


in the T T_ADR vector, initializes transmit and receive buffers 
to zero and finally sets buffer length to select promiscuous mode. 


INPUT PARAMETERS: 


none 


BEGIN 


"RETRIEVE ETHERNET PHYSICAL STATION ADDRESS AND SAVE A COPY OF IT IN THE 
‘TARGET_ADR’ VECTOR. 
INCR INDEX FROM 0 TO S DO 
BEG 


IN 
TBYTE1 = .REG_ADR [ .INDEX, ST_ADDR ]}; 
-INDEX ] = .TBYTE1; 


TARGET_ADR [ ( PHA_INDEX @« 6 ) « 
END; 
CLR_BUFFERS ( 256 ); 
END; 
-SBTTL PREP.FOR.SETUP GLOBAL ROUTINE - PREP_FOR_SETUP ( ) 
PREP .FOR.SETUP:: 
MOV R1,-CSP) ¢ 
TST -( SP) 
CLR Ri 3; INDEX 
i$: MOV R1,RO ; INDEX, 
ASL RO 
000000G ADD REG.ADR,RO 
MOV CRO), (CSP) ; *,TMP.LOCATION 
000G00G CLR TBYTEL 
000000G MOVE (SP), TBYTE1L 
000162G MOVB (SP), TARGET .ADR+162(R1) ; #,*C INDEX) 
INC R1 ; INDEX 
000005 CMP R1,95 ; INDEX,« 
BLE i$ 


P 
SPIDER SUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 


ege 59 
(20) 





; Routine Size: 


CNQNAAO DEGNA FUNCTIONAL TEST 
ROUTINE 


GLOBAL 


25 


words, Routine Base: 
; Maximum steck depth per invocation: 4 words 


- PREP_FOR_SETUP ( ) 


MOV 
JSR 
CMP 
MOV 
RTS 


4 


12-Jul-1984 13:09:35 
21-Jun-1984 08:36:19 


ACSCODE$ + 4276 





SEG Bamy 
VAX-11 Bliss-16 V4.0-579 40 
SPIDERSUSERS : (BERG. DEQNA JNQNA4, BLIs1 O0F 20) 
; 2346 
; 2315 


POO 0 90 910 10 20 G8 68 G8 8 Gd 8 0 0 10 90 10. © Gt Gn 0 10. 10. 19 10 10 10 910 910 10 10 10 10 10 be ee ee be ee ee pe be ee ee pe 





G4 


SEQ 0252 


12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 


CNQNAAO DEGNA FUNCTIONAL TEST 
21-Jun-1984 08:36:19 


GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) 
SSBTTL ‘GLOBAL ROUTINE - FORM_HEX_ADR ( PS ) ' 
GLOBAL ROUTINE FORM_HEX_ADR ( P3 ) : NOVALUE = 


> 
> 


GLOBAL ROUIINE : FORM_HEX_ADR 
DESCRIPTION: 


This routine retrives Ethernet Station Address from the Ethernet's 
Station Address PROM, saves its copy in the TARGET_ADR vector. 


INPUT PARAMETERS: 
P3 - Index to Station Address in the TARGET_ADR vector 


BEGIN 


"RETRIEVE ETHERNET PHYSICAL STATION ADDRESS AND SAVE A COPY OF IT IN THE 
TARGET_ADR’ AND ‘STATION_ADR‘ VECTORS. 


IF .P3 EQLU ZERO 
THEN 
TEMPS = O 
ELSE 
TEMPS = .P3 * 6; 
INCR INDEXS FROM O TO 5 DO 
BEGIN 
TBYTE1L = . 


REG_ADR { .INDEXS, ST_ADDR ]}; 
TARGET_ADR [{ (€ PHA_INDEX « 6 ) « .INDEXS ) = .TBYTE1; 
END; 
COUNTER = ZERO; 
ee FROM O 10 5 BY 2 DO 
TEMP1 = .TARGET_ADR [ .TEMPS + .INDEXS ); 
TEMP1 = .TEMP1 ¢f 8; 
TEMP2 = .TARGET_ADR { .TEMPS « .INDEXS + 1 ); 
STATION_ADR { .COUNTER } = ,TEMP1 OR ( Tere2 AND #0'000377' ); 
. COUNTER = .COUNTER + 1; 
$ 


7°? 
_ ae ETHERNET STATION ADDRESS ON THE CONSOLE 


COUNTER = 18; 


P 
SPIDERSUSERS : (BERG. DEQNA JNQNA4 .BLI; 1 


ege 41 
(21) 


' 
% 
' 


KPNMUMUUALSHLSSSSHLLAVVUVVUUUUUUIUS BWwUWWwN PrN 


CNQNAAO DEGQNA FUNCTIONAL TEST 
FORM_HEX_ADR ( PS ) 


GLOBAL ROUTINE - 


= 6C's’; 


DECR INDEX1 FROM 2 TO 0 00 
BEGIN 


TEMPS 


INCR I 
BEGIN 


-STATION_ADR [ 
X2 FROM O TO 


INCR INDEX3 FROM O TO 1 DO 


H4 


12-Jul-1984 13:09:35 
21-Jun-1984 08:36:19 


.INDEX1 }; 
1 DO 


BEGIN 
TEMP1 = . TEMPS AND SX‘F’; 


, oe LEQU DECIMAL‘ 9’ 


N 
TBYTE1 = #C‘O’ « 


LSE 
TSYTEL = SC’A' « C 


PHYS_ADR [ .COUNT 


ER - ° 


COUNTER = .COUNTER - 


TEMPS = . TEMPS t ( - Ds 
END 


IF .COUNTER GTRU 2 
THEN 
PHYS_ADR [ .COUNTER ] = #C’-'; 


-SBTTL FORM.HEX.ADR GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) 


COUNTER = .COUNTER - 1; 
END; 
END; 
END; 
000000G FORM.HEX. 
JSR 
TST 
000014 MOV 
BNE 
000000G CLR 
BR 
1%: MOV 
000006 MOV 
000000G JSR 
000000G MOV 
CMP 
2$: CLR 
3$; MOV 
ASL 
000000G ADD 


. TEMP 1 


.TEMP1 - sDECIMAL’ 10’ 
. TBYTE1; 


R1, $SAVES 
-(SP) 
14(SP),RO 


RO, TEMPS 
(SP)+,(SP)+ 
RO 

RO,R1 

R1 
REG.ADR,R1 


): 





VAX-11 Bliss-16 V4.0-579 Page 42 
SPIDERSUSERS: (BERG.DEQNAJNQNA4.BLI;1 (21) 


‘ 
; P3,«¢ 


; INDEXS 
H INDEXS, * 


SEQ 0253 


2354 
2377 
2379 


2377 
2381 


23835 
2385 


011116 
005037 


CNQNAAO DEQGNA FUNCTIONAL TEST 


GLOBAL ROUTINE - FORM_HEX_ADR ( PS ) 


000162G 


4$: 


5$: 


6$: 
7$: 


8$: 
9$: 


CR1),CSP) 
TBYTE1 
(SP), TBYTE1 


CSP), TARGET . ADR+162(RO) 


RO,@5 
3% 
COUNTER 
R1 
R1,RO 


TEMPS ,RO 
—- 


T 
TARGET .ADR+1(RO), TEMP2 


TEMP2¢1 
COUNTER ,RO 
RO 


Re 
R2, STATION. ADR(RO) 
COUNTER 


#2,R1 
R1,05 


4$ 

$22 , COUNTER 

$45, PHYS.ADR 
#101 ,PHYS.ADR+1 
$40, ,PHYS.ADR+23 
45 ,PHYS.ADR+24 
#116,PHYS.ADR+25 


04,R1 
— 


62,R2 
TEMPS , TEMP 1 
6177760, TEMP1 


RO, @11 
8$ 


RO, TBYTEL 
660, TBYTE1 


9$ 

RO, TEYTE1 

067, Ls gh 

COUNTER RO 
TBYTE1,PHYS.ADR(RO) 
COUNTER 


SEQ 0254 
VAX-11 Bliss-16 V4.0-579 Page 43 
SPIDERSUSERS:(BERG.DEQNAJNQNAS.BLI;1 (21) 


3; *, TMP .LOCATION 


; *,*C INDEXS) 2386 

; INDEXS 2383 

; INDEXS,« 

$ 2389 

: INDEXS 2391 

; INDEXS,« 2393 

i 2394 

$ 2395 
$ 2396 
3 2397 
; *,INDEXS 2391 
oe INDEXS, * 

: 2404 
$ 2405 
3 2406 
3 2407 
$ 2408 
: 2409 
; *, INDEX?! 2411 
; *CINDEX1),+« 2413 
; *, INDEX2 2414 
; *, INDEXS 2416 
3 2418 
3 2419 
$ 2421 
$ 2419 
3 2423 
; 2424 
; 2425 
: 2426 


DEQNA FUNCTIONAL TEST 


NQNA4 CNQNAAO 
vO1.0 GLOBAL ROUTINE - FORM_HEX_ADR ( PS ) 


005337 000000G 10%: 


; Routine Size: 153 words, 


; 2439 i 
; 2440 1 


10% 
#55.PHYS.ADRCR2) 
OUNTER 


Routine Base: ACSCODE$ + 4360 
; Maximum stack depth per invocation: 8 words 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNA4 .BLI;1 





; INDEXS 


INDE X2 


#, INDEX1 


SEQ 0255 
Page 44 
(21) 


2416 
2429 
2431 
2433 
2414 
2411 
2354 


IK4 


NQNA4 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35  VAX-11 Bliss-16 V4.0-579 -—— 45 
v01.0 GLOBAL ROUTINE - XMIT_SETUP_PACKET ( P1 ) 21-Jun-1984 08:36:19  SPIDERSUSERS:(BERG.DEQNAJNQNAS.BLI;1 — (22) 


SSBTTL ‘GLOBAL ROUTINE - XMIT_SETUP_PACKET ( P1 )° 





XBUF _LLENGTH = - ( .RBUF_LENGTH f -1 ); 
SET_RDESCR_LIST ( .XBUF_LENGTH, VE ); 
SET_XDESCR_LIST ( .XBUF_LENGTH, VSE ); 


IF .P1 EQLU A_MODE 
THEN 


BEGIN 
XBUF_LENGTH = - ( ( .RBUF_LENGTH f -1 ) + 1 ); 
SET_XDESCR_LIST ( .XBUF_LENGTH, VSEL ); 
— ( .XBUF_LENGTH, VE ); 
) 


XMIT_AND_RCV_PACKET (€ ); 
See 


' COMPARE STATUS REGISTERS TO EXPECTED VALUES 


; 1 

: 2442 1 

; 2443 1 GLOBAL ROUTINE XMIT_SETUP_PACKET ( P1 ) : NOVALUE = 

: 2444 1 

; 2445 1 See 

; 2446 1 : 

; 2447 1 $ GLOBAL ROUTINE : XMIT_SETUP_PACKET 

3 2448 1 : 

; 2449 1 $ DESCRIPTION: 

; 2450 1 H 

; 2451 1 : This routine initializes descriptor lists to transmit and receive 
; 2452 1 : unchained Setup loopback packet. After loopback packet has been 
; 2453 1 : received DEQNA CSR, transmit and receive status registers are 
; 2454 1 : checked for proper status. Finally, transmit and receive packets 
; a : : ere compared to verify that they are identical. 

; . 

; 2457 1 : XMIT_O_LIST ({ 0 ] = NEWB RCV_D_LIST { 0 ] = NEWB 

; 2456 1 g XMIT_DO_LIST { 1 ] = VSE RCV_D_LIST { 1 ] = VE 

; 2459 1 : XMIT_O_LIST ({ 2 ] = XMIT_BUFFER RCV_D_LIST { 2 ] = RCV_BUFFER 
>; 2460 1 : XMIT_D_LIST { 3 ] = .XBUF_LENGTH RCV_D_LIST { 3 ) = .XBUF_LENGTH 
; 2461 1 : XMIT_D_LIST [4] = 0 RCV_D_LIST { 4 ] = 0 

; 2462 1 : XMIT_O.LIST (5 ]) = 0 RCv_O_LIST {5 ]) +0 

; 2463 1 : XMIT_D_LIST [6] = V RCV_D_LIST [6] = V 

; 2464 1 : XMIT_D_LIST [7] 2=€E RCV_O.LIST([7)])=€E 

; 2465 1 : 

: 2466 1 : 

; 2467 1 ' INPUT PARAMETERS: 

; 2466 1 H 

; 2469 1 : Pl - transmit buffer length in bytes 

; 2470 1 : 

F 2471 1 §-- 

$ 2472 i 

; 2473 2 BEGIN 

; 2474 2 

; 2475 : CLR_DESCR ( ); 

$ 

3 2 

$ 2 

: 2 

; 2 

; 2 

3 2 

: 3 

: 3 

; 3 

; 3 

; 2 

$ e 

F 2 

3 2 

: 2 

; 2 

; 2 





—MMMMMM Ml fo 


NQNAAO DEQGNA FUNCTIONAL TEST 
GLOBAL ROUTINE - XMIT_SETUP_PACKET ( Pl ) 


CHK_RIXI_STATUS ( ONE ); 
CHK_CSR_STATUS ( CSR_ STATUS, CSR_MASK ); 
CHK_RCV_STATUS ( RFLG_STATUS, RWD1_ STATUS )3 


TEMP1 = XWD12_STATUS; 
IF .XMIT_D_LIST { STE16 ] 
THEN 
TEMP1 = #0'002400' ; 
CHK _XMIT_STATUS (€ XFLG_STATUS, .TEMP1 ); 


COMPARE PACKETS ( ); 


12-Jul-1984 13:09:35 
21-Jun-1984 08:36:19 





SEQ vas 


VAX-11 Bliss-16 V4.0-579 
SPIDER SUSERS : [BERG . DEQNA JNQNAG. BLI;1 


$ 0'100220', 0'100220' 
! 0' 140000‘, 0'020000' 


! 0°000400' 


$ 0'140000', 2722??? 


END; 
. SBTTL XMIT. SETUP .PACKET GLOBAL ROUTINE - XMIT_SETUP_PACKET ( Pil ) 
001204’ XMIT. SETUP. PACKET: 
JSR PC, ‘CLR. DESCR ; 
000002 000000G MOV 2¢ SP), ~ yf LENGTH ; Pl, 
000002 MOV 2(SP),RO ; RBUF .LENGTH,+ 
ASR RO 
NEG RO 
000000G MOV RO, XBUF .LENGTH 
MOV RO, -CSP ; XBUF.LENGTH, + 
MOV @-60000, -( SP) 
003176’ JSR PC ,.SET. RDESCR. LIST 
000000G MOV XBUF . LENGTH, (SP) : 
130000 MOV #-50000, -( SP) 
Of JOOO0G MOV RBUF .LENGTH,RO ; 
ASR RO 
INC RO 
NEG RO 
000000G MOV RO, XBUF .LENGTH 
MOV RO, (CSP) ; XBUF .LENGTH, * 
130200 MOV #-47600, -( SP) 
003254 ' JSR PC SET. XDESCR. LIST 
MOV XBUF . LENGTH, (SP) : 
MOV #-60000, -(SP) 
003176' JSR PC SET. ROESCR.LIST 
CMP 4 SP de, CSP + : 
000000V 1$; JSR PC, XMIT.AND.RCV.PACKET ; 
000001 MOV #1,¢ : 
001260' JSR PC CHK .RIXI.STATUS 
100220 MOV #-77560,(SP ) ; 
MOV CSP), -(SP) 
001644' JSR PC,.CHK.CSR.STATUS 
140000 MOV #-40000, (SP) ; 
020000 MOV #20000, -( SP) 
002300' JSR PC CHK .RCV.STATUS 


46 
oe 22) 


2475 
2476 
2477 


2478 
2479 


2481 
2484 


2485 
2486 


2483 
2489 
2495 


2496 


2497 


000174 012757 
000202 


3 Routine Size: 
; Maximum stack 





M4 


NQNAA QNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 
CNOA. ROUTINE - XMIT_SETUP_PACKET ( Pi ) 21-Jun-1984 08:36:19 
MOV 0400, TEMP1 
002000 000010G ot Speenennns AEST = 88 
000000G MOV 92400, TEMP1 

10000 26: MOV «#40000, (SP) 

000000G MOV TEMP1,-CSP) 
002002’ JSR PC, CHK. XMIT.STATUS 
002560’ = oe - ieeiee -PACKETS 
000014 os ps ° 

83 words, Routine Base: ACSCODE$ + 5042 


depth per invocation: 7 words 


SEQ 0256 


VAX-11 Bliss-16 V4.0-579 


P 
SPIDER SUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 es 


ee 
°o 
~ 
© 


8 8 BERD G8 8 GE FD 0 90 10.90 19 99 19 10 19 10 10 10 10 ee ee ee ee ee ee ee be ee pe ee 


N4 


CNGNAAO DEQNA FUNCTIONAL TEST 12-Jul-1 
GLOBAL ROUTINE - SEND_ELOOP_PACKET ( PS ) 21-Jun-1 


SSBTTL ‘GLOBAL ROUTINE - SEND_ELOOP_PACKET ( PS ) ‘ 
GLOBAL ROUTINE SEND_ELOOP_PACKET ( PS ) : NOVALUE = 


$% 
g 
¢ 


> 
> 


GLOBAL ROUTINE : SEND_ELOOP _PACKET 


DESCRIPTION: 


then initiates transmissin of ea loopback packet. After 


egisters ere checked for proper status. 
peckets are compared to verify that they are identical. 


SEQ oeee 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : (BERG. DEQNA JNQNAG .BLI;1 


This routine initializes transmit and receive descriptor lists and 


loopbeck packet is received DEQNA CSR, transmit and receive status r 
Finally, transmit and receive 


XMIT_D_LIST [ 0 ) = NEW RCV_D_LIST { 0 ) = NEWB 
XMIT_D_LIST { 1 ] = VE RCv_D_LIST { 1 ) = VE 
XMIT_D_LIST { 2 } = XMIT_BUFFER RCV_D_LIST { 2 ) = RCV_BUFFER 
XMIT_D_LIST { 3 ) = .XBUF_LENGTH RCV_DO_LIST { 3 ) = .XBUF_LENGTH 
XMIT_D LIST [4] =0 v_O.LIST(4)])=0 
XMIT_D_LIST [5] =0 RCv_D.LIST (5 ])=0 
XMIT_O LIST (6) V RCV_D.LIST (6) = V 
XMIT_D LIST (7) =€E RCV_D.LIST{ 7) =€E 

INPUT PARAMETERS: 
P3 - 

BEGIN 

PUT_BIT ( CSR, LB, INX_LOOPBACK ); 

XMIT_AND_RCV_PACKET ( ); 

See 

COMPARE STATUS REGISTERS TO EXPECTED VALUES 

CHK_RIXI_STATUS ( ZERO ); 

CHK_CSR_STATUS ( CSR “STATUS, CSR_MASK ); ! 0'100220', 0‘ 100220' 

CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_ STATUS ); ! 0'140000' , 0'000400' 


IF .P3 EQLU ZERO 
THEN 


BEGIN 
— ( RFLG_STATUS, RWDI_STATUS ); ! 0°140000' , 0'020000' 
ELSE 
BEGIN 
TEMP1 = RWD14_STATUS; ! 0'060000' 


IF .RCV_O_LIST [ STHD1 ] AND #0'070001' EQLU #0'070001' 


Page 46 
(22) 





BS 


NONA4S CNQNAAO DEQGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Blies-16 V4.0-579 “a 49 
vo1.0 GLOBAL ROUTINE - SEND_ELOOP _PACKET ( PS >) 21-Jun-1984 08:36:19 SPIDERSUSERS : (BERG . DEQNA )NONA4 .BLI; 1 (23) 
5 25635 5 
; 2564 3 TEMP1 = 60°0O70001'; 
; 2565 3 CHK_RCV_STATUS ( RFLG_STATUS, .TEMP1 ); £ 0° 140000'., 2777??? 
s 2566 2 3 
; 2567 1 END; 

-SBTTL SEND.ELOOP.PACKET GLOBAL ROUTINE - SEND_ELOOP PACKET ( P3 ) 
000000 013700 000000G SEND .ELOOP .PACKET: : 

MOV REG. ADR ,RO 3 2543 
000004 042760 001400 000016 BIC #1400, 16(RO) 
000012 052760 001000 000016 BIS #1000, 16(RO) 
000020 004737 \000000V JSR PC, XMIT.AND.RCV.PACKET 3 2544 
000024 CLR -( 3 2550 
000026 004757 ’ JSR PC CHK .RIXI.STATUS 
000032 012/16 100220 MOV @-77560,(SP) 3 2551 
000036 011646 MOV (SP), -CSP) 
090040 004737 001644’ JSR PC,.CHK.CSR.STATUS 
000044 012716 MOV @-40000, (SP) 3 2552 
000050 012746 000400 MOV @400, -( SP) 
000054 004737 ’ JSR PC .CHK.XMIT. STATUS 
000060 005766 000010 TST 10( SP) 3; P3 2554 
000064 001 BNE is 
000066 012716 140000 MOV @-40000, (SP) : 2557 
000072 012746 020000 MOV #20000, -( SP) 
000076 16 BR 3$ 
000100 012737 060000 1%: MOV #60000, TEMP 1 3 2561 
000106 032737 000001 000010G BIT 1,RCV.0.LIST+10 : 2562 
000114 1403 BEG 2s 
000116 012737 070001 000000G MOV 70001, TEMP1 3 2564 
000124 012716 140000 2s: MOV @-40000, (SP) : 2565 
000130 013746 MOV TEMP1,-CSP) 
000134 004737 300° 3%: JSR PC, CHK RCV. STATUS 
000140 062706 000010 ADD #10,SP : 2541 
000144 000207 RTS PC : 2512 
: Routine Size: 51 words, Routine Base: ACSCODES + 5510 
s Maximum steck depth per invocation: words 


; 25686 1 


£9 FS F0 FO FR 0 90 90 90 90 90 90 G8 8 8 0 0 10 FD A 90 90 10 00 be ee ee be be be be be be be be be be be be ee ee ee 





SE 
VAX-11 Bliss-16 V4.0-579 a 


D=QNA FUNCTIONAL TEST ege 50 
:19 SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 (24) 


CNGNAAO 

GLOBAL RCUTINE - SEND_TEST_PACKET 

SSBTTL ‘GLOBAL ROUTINE - SEND_TEST_PACKET ° 
GLOBAL ROUTINE SEND_TEST_PACKET : NOVALUE = 


eo 


GLOBAL ROUTINE : SEND_TEST_PACKET 


DESCRIPTION: 


This routine initializes transmit and receive descriptor lists and 
then initiates transm:ssin of an external loopback packet. 


XMIT_DO.LIST [ 0 ) = NEWB RCV_O.LIST [ 0 ] = NEWB 
XMIT_O LIST {[ 1 ] = VE RCV_D_LIST { 1 ] = VE 
0 { 2 ]) = XMIT_BUFFER RCvV_O_LIST { 2 }] = RCV_BUFFER 

XMIT_O LIST { 3 ] = .XBUF_LENGIH RCV_D_LIST { 3 ) = .XBUF_LENGTH 
XMIT_D.LIST (4) +0 RCV_O.LIST (4) +0 
XMIT_O.LIST (5 ] +0 RCv_O.LIST {5 ] = 0 
XMIT_O.LIST [6] = V RCV_O.LIST (6) V 
XMIT_O-LIST({ 7) =€ RCV_D-LIST([ 7] =€ 


INPUT PARAMETERS: 
None 


8S OS 82 8S 6S 6S 6S 1S 8S §S 8S 1S SS 8G 2S OS 2 FS O@ Fe Oe 8 Ce 

-~4 
{ 

' 

r 
Lael 
w 
— 


BEGIN 


See 
$ WRITE ETHERNET STATION ADDRESS AND DATA PATTERN INTO THE TRANSMIT BUFFER 


RESET _DEQNA ( ); 
— INDEX FROM O T0 5 00 


GIN 
XMIT_BUFFER ( .INDEX ]} ° 
at aren { .INDEX «-6) = 
3 


XMIT_BUFFER [ PKT_TYPE ] = LPB_PKT; 
XMIT_BUFFER [ PKT_TYPE + 1 ] * SKIP_CNT; 
XMIT_BUFFER [ PKT_TYPE « 2 ) = RFC; 


. TARGET_ADR [ (€ PHA_INDEX ¢ 6 ) « . INDEX ]; 
. TARGET_ADR { (€ PHA_INDEX * 6 ) + . INDEX }; 


s 
o 


CONVERT SETUP PACKET SIZE FROM BYTE COUNT TO WORD COUNT AND SET UP 
DESCRIPTOR LISTS 


RBUF LENGTH © PKT_LENGTH + 14; 
XBUF LENGTH = - (~.RBUF_LENGTH t -1 ); 


7 @F © © OF GF GF Ge oF OF oF os 
MMMM Mlle fotty 


; Routine Size: 
; Maximum steck 





DS 


CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 15:09:35 
GLOBAL ROUTINE - SEND_TEST_PACKET 21-Jun-1984 08:36:19 


SET_RDESCR_LIST ( .XBUF _LENGTH, VE ); 
SET_XDESCR_LIST ( .XBUF_LENGTH, VE ); 


See 
: ser DEQNA TO EXTERNAL LOOPBACK MODE AND SEND LOOPBACK PACKET 


PUT_BIT ( CSR, LB, EXT_LOOPBACK ); 
XMIT_AND_RCV_PACKET ( ); 


VAX-11 Bliss-16 V4.0-579 P 
SPIDERSUSERS : (BERG . DEQNA )NQNA4 .BLI; 1 


END; 

.SBTTL SEND. TEST.PACKET GLOBAL ROUTINE - SEND_TEST_PACKET 
000324’ SEND. TEST. PACKET: : 

JSR PC,RESET.DEQNA 

CLR RO 3: I 
000162G 000000G 1$: MOVB TARGET .ADR+162(RO), XMIT. suites 3 

#( INDEX), «C INDEX) 
000162G 000006G MOVB TARGET .ADR+162(RO), XMIT. BUFFER+6CRO) $ 
; *C INDEX), «C INDEX) 

INC RO : INDEX 
000005 ty i : INDEX,« 
000220 000014G MOvVB 9220, XMIT .BUFFER+14 . 
000015G CLRB XMIT .BUFFER+15 ; 
000001 000016G MOVB 61,XMIT.BUFFER+16 ; 
002752 000000G MOV $2752, RBUF .LENGTH 8 
002752 MOV €2752,R0 3 

ASR RO 

NEG RO 
000000G MOV RO, XBUF .LENGTH 

MOV RO, -(SP) ; XBUF .LENGTH, « 
120000 MOV @-60000, -( SP) 
003176’ JSR PC, SET. RDESCR. LIST 
000000G MOV XBUF LENGTH. (SP) s 
120000 MOV @-60000, -(SP) 
003254' JSR PC ,.SET. XDESCR. LIST 
000000G MOV REG. 3 
001400 000016 BIS $1400.16 ee RO) 
000000V JSR PC, XMIT, AND .RCV.PACKET : 
000006 ADD 06. SP $ 

RTS PC 3 

51 words, Routine Base: ACSCODE$ + 5456 

depth per invocation: 4 words 





ee ees 


CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 — Ang S52 
vo1.0 GLOBAL ROUTINE - XMIT_AND_RCV_PACKET 21-Jun-1984 08:36:19 SPIDERSUSERS : [BERG . DEQNA )NQNAG. ri OF 05) 
; 2635 : @SB8TTL ‘GLOBAL ROUTINE - XMIT_AND_RCV_PACKET ° 
$ 26 
$ 2637 1 GLOBAL ROUTINE XMIT_AND_RCV_PACKET : NOVALUE = 
; 2638 1 
; 2639 1 See 
3 2640 1 § 
3 ort: : : GLOBAL ROUTINE : XMIT_AND_RCV_PACKET 
3 . 
5 26435 1 * DESCRIPTION: 
5 2644 1 : 
; 2645 : : This routine initiates transmit and receive operations. 
2 2646 . 
8 2647 1 * INPUT PARAMETERS: 
3 2648 1 : 
5 2649 1 H 
3 2650 1 $ 
3 2651 1 $ 
8 2652 1 §-- 
8 26535 1 
$ 2654 2 BEGIN 
s 2655 2 
8 26 2 .IOP_TABLE { RLO_ADR ] = RCV_D_LIST; 
$ pon : .I0P_TABLE [ RHI_ADR } = O; 
3 
3 2659 2 -IOP_TABLE { XLO_ADR } = XHIT_DO_LIST; 
8 2660 2 IOP_TABLE [ XHI_ADR ) = O; 
3 2661 2 
$ 2662 1 END; 
-SBTTL XMIT.AND.RCV.PACKET GLOBAL ROUTINE - XMIT_AND_RCV_PACKET 
000000 012777 000000G 000004G XMIT.AND.RCV.PACKET: : —_ 
MOV ORCV. e. LIST, @IOP. TABLE +4 ; 2656 

005077 000006G CLR SIOP . TABLE «6 ; 2657 
000012 012777 9000000G 000010G MOV OxXMIT.D.LIST,@IOP. TABLE+10 : 2659 
000020 005077 000012G CLR @IOP.TABLE+12 ; 2660 
000024 000207 RTS PC ; 2637 
s Routine Size: 11 words, Routine Base: ACSCODE$ + 5624 


; Maximum steck depth per invocetion: O words 


3 26635 1 
$ 2664 1 


oO eee > 


rs 


3 
.IOP_TABLE { CSR ] = DISABLE; 
END; 


NQNA4 CNGNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Blises-16 V4.0-579 ~~ 3 53 
v01.0 GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( P3 ) 21-Jun-1984 08:36:19 SPIDERSUSERS : (BERG. DEQNA )NQNA4 .BLI;1 (26) 
; 2665 1 SSBTTL ‘GLOB“t ROUTINE - XMIT_ILOOP_PACKET ( P3 ) ' 
2666 1 
+ 5667 1 «GLOBAL ROUTINE XMIT_ILOOP_PACKET ( P3 ) : NOVALUE = 
3 2668 1 
; 2669 1 fee 
; 2670 1 : 
; 2671 1 * GLOBAL RIUTINE : XMIT_ILOOP_PACKET 
3 2672 1 : 
; 2673 1 § DESCRIPTION: 
3 2674 1 : 
; 2675 i : This routine 
$ 2676 1 : 
; 2677 1 * INPUT PAR/METERS: 
3 26768 1 s 
3 2679 1 s P3 - selector 
8 2680 1 $ 
3 26861 1 $-- 
$ 2682 1 
; 26863 2 BEGIN 
3 2684 2 
; 2685 2 CLR_DESCR (€ ); 
; 2686 2 
; 2687 2 SET_RDESCR_LIST ( .XBUr LENG'A, VE ); 
: poe : SET_XDESCR_LIST (€ .XBUF _LiotwT.4, VE ); 
5 
; 2690 2 XMIT_AND_RCV_PACKET ( ); 
$ 2691 2 
s 2692 2 -I0P_TABLE [{ CSR ]) = EENABLE; 
$ 2693 2 
; 2694 2 IF .P3 EQLU ONE 
3 2695 2 THEN 
$ 2696 3 BEGIN 
s 2697 3 CHK _RIXI_STATUS (€ ONE ); 
; 2698 3 “CSR_STATUS ( CSR_ STATUS. CSR_MASK ); § 0'100220', 0'100220' 
:; 2699 3 CHK_RCV_STATUS ( RFLG_STATUS, RWD16_ STATUS >; ! 0°1400C0', 0'044000' 
; 2700 3 END 
3 2701 2 ELSE 
s 2702 3 BEGI 
; 2703 3 CHK_RIXI_STATUS (€ ZERO ); 
: 2704 8 CHK_CSR_STATUS ( CSR_ STATUS, CSR_MASK ); § 0'100220', 0' 100220’ 
s #70 3$ CHK_RCV_STATUS ( RFLG_STATUS, RWD13_ STATUS ds; ! 0°140006', 0'000000' 
: aret END; 
3 
:; 2708 2 CHK _XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS ); § 0° 140000‘ , 0'000400' 
; 2709 2 COMPARE PACKETS ( ) 
3 
$ 2 
$ 1 


. SBTTL XMIT. ILOOP.PACKET GLOBAL ROUTINE - XMIT_TLOOP_PACKET ( PS ) 


000000 004737 001204' XMIT. ILOOP PACKET: 
JSR PC, ‘CLR. DESCR ; 2685 


63 words, 
depth per invocation: 


: Routine Size: 
; Maximum stack 


CNQNAAO DEQNA FUNCTIONAL TEST 
GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( PS ) 


000016G 
000001 


1$: 


2s: 


ADO 
RTS 





GS 


12-Jul-1984 13:09:35 
21-Jun-1984 08:36:19 


XBUF .LENGTH, -( SP) 
@-60000, -(SP) 
PC,SET.RDESCR.LIST 
XBUF . LENGTH, (SP) 


@-60000, -(SP) 
PC,SET.XDESCR.LIST 


PC, XMIT.AND.RCV.PACKET 


01, a10P. io +16 
_— 


#1,(SP) 

PC CHK .RIXI.STATUS 
0-77560,(SP) 

(SP), -CSP) 

par og laa 


(SP) 

PC CHK .RIXI.STATUS 
@-77560,(SP 

CSP), -CSP) 
#-40000, (SP) 


#400, -(SP) 

PC CHK. XMIT. STATUS 
PC ,.COMPARE .PACKETS 
@IOP. TABLE +16 
#14,SP 

PC 


Routine Base: ACSCODES$ + 5652 
7 words 


VAX-11 Bliss-16 V4.0-579 
SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI; 1 


SEQ 0265 
Pege 54 
(26) 


2687 


POPES: . -Peeeee os 


NQNA4 CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 ~~ -% 5S 
v01.0 GLOBAL ROUTINE - TURN_OFF_LED ( Pi ) 21-Jun-1984 08:36:19 SPIDERSUSERS : [BERG . DEQNA JNQNA4 .BLI;1 (27) 
; 2715 1 @SBTTL ‘GLOBAL ROUTINE - TURN_OFF_LED ( Pi )' 

2716 1 
‘5717 1 —sGLOBAL ROUTINE TURN_OFF_LED ( P1 ) : NOVALUE = 
s 2716 1 
; 2719 1 See 
3 2720 1 s 
s gven i ' GLOBAL ROUTINE : TURN_OFF _LED 
3 e722 1 : 
8 2723 1 ' DESCRIPTION: 
: 2724 1 : 
3 2725 1 : This routine 
3 2726 1 ' 
; 2v27 1 ¢ INPUT PARAMETERS: 
$ 2728 1 : 
; e729 1 : Pi - 
: 2730 1 : 
3 2731 1 §-- 
s 2732 1 
; 2733 2 BEGIN 
; 2734 2 
; 2735 2 PREP_FOR_SETUP ( ); 
3 2736 2 
. na 6a INCR INDEX1 FROM 1 TO 14 DO 
: th : WRT_STATION_ADR € .INDEX1, PHA_INDEX ); 
3 
$ 2740 2 XMIT_SETUP_PACKET ( .P1 ); 
3 2741 2 
$ 2742 2 
; 2743 1 END; 

.SBTTL TURN.OFF.LED GLOBAL ROUTINE - TURN_OFF_LED ( Pl ) 

000000 010146 TURN. OFF .LED:: 
000002 004737 004276’ JSR PC PREP .FOR.SETUP : 2735 
000006 012701 000001 MOV #1,R1 ; *, INDEX1 2737 
000012 010146 1$: MOV R1,-CSP) ; INDEX1,¢ 2738 
000014 012746 000023 MOV @23,-C€SP) 
000020 004737 004074’ JSR PC,WRT. STATION. ADR 
000024 022626 CMP (SP)+,(SP)-+ 
000026 005201 INC Ri ; INDEX1 2737 
000030 020127 000016 CMP R1,¢16 ; INDEX1,¢ 
000034 003766 BLE is 
000036 016646 000004 MOV 4(SP),-(SP) ; Pl. 2740 
000042 004737 005042’ JSR PC, XMIT.SETUP.PACKET 
000046 005726 TST (SP )-+ $ 2735 
000050 012601 MOV (SP)+,R1 : 2717 
000052 000207 RTS PC 
; Routine Size: 22 words, Routine Base: ACSCODE$ + 6050 


; Maximum stack depth per invocation: 4 words 


NQNA4 CNQNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:09:35 VAX-11 Bliss-16 V4.0-579 -— 3 56 
vo1.0 GLOBAL ROUTINE - TURN_OFF_LED ( Pl ) 21-Jun-1984 08:36:19 SPIDERSUSERS: (BERG. DEGQNA JNQNA4.BLI;1 (27) 
; 2744 | 
; 2745 «(1 
3 2746 1 END 
; 2747 O ELUDOM 
; OTS external references 
-GLOBL $SAVE3, $SAVE2, BLSDIV, BLSMOD 
-GLOBL B6LS$MUL 
: PSECT SUMMARY 
Psect Name Words Attributes 
; AC$CODE$ 1578 7s Sf le ts Ce |OUR 
; Library Statistics 
$ 
FS Fe eS Se, SS ee nos ymbols -------- Pages Processi 
; File Totel Loaded Percent Mapped Time ™ 
3 
; SPIDERSUSERS: (BERG. DEQNA)QNALIB.L16;3 223 132 59 14 00:00.0 


COMMAND QUALIFIERS 
BLISS/PDP11/ENV:NOEIS NQNA4S.BLI/LIST=NQNA4.LIS/OBJECT =NQNAG .OBJ/SOURCE =PAGE :53 
Size: 1578 ~ 0 date words 


Elapsed Time: 01:30.3 
Lines/CPU Min: 3613 
Lexemes/CPU-Min: 25874 
cont Used: 240 pages 
Compilation Complete 


rere rer OOO0C0OO 


JS 


CNGNAAO DEGNA FUNCTIONAL TEST 12-Jul-1984 13:11:07  VAX-11 Bliss-16 V4.0-579 a 
21-Jun-1984 08:36:21  SPIDERSUSERS:(BERG.DEQNAJNQNAS.BLI; 1 
MODULE MOWAS (STITLE ‘CHORAAO DEGNA FUNCTIONAL TEST: 
ADDRESSING. -MODE( ABSOLUTE ) 
SSBTTL ‘LAST ADDRESS AND SETUP SECTION’ 
BEGIN 
LIBRARY ‘QNALIB’ ; ! QNALIB LIBRARY 
REQUIRE ‘BLSMAC.REQ’ ; ! DIAGNOSTIC SUPERVISOR LIBRARY 
! <BLF /NOF ORMAT > 


1 
(1) 


\ 7 


SEG 0269 
NQNAS CNQNAAO DEQNA FUNCTIONAL TEST 12-Jul-1984 13:11:07 VAX-11 Bliss-16 V4.0-579 a 2 
v01.0 LAST ADDRESS AND SETUP SECTION 21-Jun-1984 08:36:21 SPIDERSUSERS : [BERG .DEQNA JNQNAS .BLI;1 (2) 
1502 2 LASTAD 
1503 2 BGNSETUP( 1); § NUMBER GF P-TABLES 
P 1504 2 BGNPTAB 
1505 2 ENDPTAB 
1506 1 ENDSE TUP 
. TITLE NQNAS CNQNAAO DEQNA FUNCTIONAL TEST 
-IDENT /V01.0/ 
-ENABL AMA 
000000 -PSECT $xXYZ$, RO 
000000 000004’ BLS$LAS::.WORD TSFREE 
000002 O00000C j <<TS$FREE-<BL$LAS+4>>/2> 
000004 000000 TSFREE::.WORD O 
000004 ' LS$LAST== BLSLAS+4 
000001 TSPTHV== 1 
.SBTTL $SEND.LINK LAST ADDRESS AND SETUP SECTION 
000000 000207 SEND.LINK:: 
RTS PC F 1499 
; Routine Size: 1 word, Routine Base: $XYZ$ + 0006 
; Maximum stack depth per invocation: O words 
1507 1 
1508 ND 
1509 0 ELUDOM 
3 PSECT SUMMARY 
; 
3 Psect Name Words Attributes 
3 $xvZ$ 4 RO ir LH, TA. Ce 
Library Statistics 
woreeee ~ Symbols -------- Pages Processing 
File Totel Losded Percent Mapped Time 
SPIDERSUSERS: (BERG.DEQNA JQNALIB.L16;3 223 3 1 14 00:00.1 


SEQ 0270 
13:11:07 VAX-11 Bliss-16 V4.0-579 Page 


NQNAS DEQNA FUNCTIONAL TEST 12-Jul-1 z 
SPIDER SUSERS : (BERG. DEQNA JNQNAS.BLI;1 (2) 


CNQNAAO 984 
v01.0 LAST ADDRESS AND SETUP SECTION 21-Jun-1984 06:36: 


COMMAND QUALIFIERS 
BLISS/PDF11/ENV:NOEIS NQNAS.BLI/LIST=NQNAS.LIS/OBJECT =NQNAS .OBJ/SOURCE =PAGE : 53 


Size: 1 code + 3 data words 
Run ae | ans 

Elepsed Time: :07. 

Lines/CPU Min: 14965 
Lexemes/CPU-Min: 78773 

Memory Used: 101 pages 
Compilation Complete 


OF rr RP rR rrr rere OOOCOFrFr rr OOOCOCOrF FKP ODOCCOCOOO 


MS 


SEQ 027 
12-Jul-1984 13:02:55  VAX-11 Bliss-16 V4.0-579 a" 1 
8-Apr-1984 18:46:15  SPIDERSUSERS:(BERG.DEQNAJQNALIB.R16;1 (1) 


> 
> 


DEFINE DATA STRUCTURES IN THIS SECTION 


! DEFINE ACCESS ALGORITHM 


yw 
~ 


RUC TURE 
REG_STR { 0, P, S, E J* 
BEGIN 


LOCAL TMP_LOCATION; 
TMP _LOCATION = .CREG_STR + SUPVAL *« 0) <0,#BPVAL,O>; 


TMP _LOCATION 
END < P, S, E >; 


STRUCTURE § DEFINE ACCESS ALGORITHM 
ADR_STR [ 0, P. S,. E j= 
BEGIN 
LOCAL TMP_LOCATION; 
TMP_LOCATION = CADR_STR + SUPVAL * 0) <0,#BPVAL,O>; 


TMP _LOCATION 
END < P, S, E >; 


STRUCTURE ! DEFINE ACCESS ALGORITHM 
LBLOCK [ 0, P, S, E. I J= 


BEGIN 
CASE I FROM O TO 2 OF 
SET 


{0}: 
a er > 


a *( LBLOCK + 0 * SUPVAL ); 

"€ .LBLOCK + O ¢ SUPVAL ); 
TES; 

END < P. S, E >; 


cooooccoecec“ooooooooooo0qo0o0o000000°cooo0°oc°o5o 


a Ee Ee SS 68S +e+ 4+ SASS os + + COT ate 


NS 


12-Jul-1984 13:02:5 
8-Apr-1984 18:46:1 


SEQ 0272 
S  VAX-11 Bliss-16 V4.0-579 age 
| SPIDERS'JSERS : (BERG. DEQNA JQNALIB.R16;1 
See 


! MACRO DEFINITIONS 
; 
bee 


MACRO 
TST_BIT (€ ADOR, EXPECTED ) = 
( IF ( .ADDR AND EXPECTED ) EQLU EXPECTED 
—= 
ELSE 
FALSE )s, 


mt OFFSET, POSITION, IMAGE ) = 
( .REG_ADR + SUPVAL « OFFSET )< sFIELDEXPAND ( POSITION ) > = IMAGE; 
ENDs, 


oe ( OFFSET, POSITION, IMAGE ) = 
ae ¢ OFFSET )< SFIELDEXPAND ( POSITION ) > = IMAGE; 


: 
' 
! THIS MACRO GETS BITS SPECIFIED BY THE FIELD NAME “ POSITION “ 
! AND MEMORY LOC SPECIFIED BY (.REG_ADR + SUPVAL * OFFSET) 

+ 

: 


GET_BIT ( OFFSET, POSITION ) = 
.REG_ADR { OFFSET, POSITION ] #; 


2 
(2) 








ooocoooooooooococoocoeooocooocooooooeooooosooooooescoaoeooesoooo 





M4 _DEL 
M5 _DELAY 


Tre LIMIT 

TIME2 LIMIT 
Lh 5 8 LIMIT 
TIME4 LIM 





-LIMI 
TIMES_LIMIT 
TIMES_LIMIT 


STEP1 





66 


12-Jul-1964 13:02:55 
68-Apr-1964 18:46:15 


DELAY - LOOP ITERATION COUNT 
DELAY - LOOP ITERATION COUNT 
DELAY - LOOP ITERATION COUNT 
DELAY - LOOP ITERATION COUNT 
DELAY - 16K LOOP ITERATION COUNT 
DELAY - LOOP ITERATION C 

DELAY - LOOP ITERATI T 
DELAY - LOOP ITERATION COUNT 
DELAY - LOOP ITERATION COUNT 


1/0 PAGE REGISTER SIZE 
OFFSET TO DEVICE ADDRESS 
OFFSET TO DEVICE VECTOR ADDRESS 


VAX-11 Blies- 


SPICERSUSERS : (BERG 


16 
(BERG 


V4 .0-S79 
- DEQNA JQNALIB.R16; ng 


SEQ 0272 
P 


3 
(3) 


eoooo°o 


IOP _BRL 
INT _VEC 


CSR 
WORD _LIMIT 


7, 
60‘177777', 


C6 


12-Jul-1984 13:02:55 
68-Apr-1984 18:46:15 


OFFSET TO DEVICE BR LEVEL 


74 
VAX-11 Bliss-16 V4.0-579 = a 
SPIDERSUSERS : (BERG. DEQNA JQNALIB.R16; 1 


4 
(3) 


coooocooooococec|meoocooooooooooooooo0o0o0oo0o0o0o000000o000osoo 


0_FLAG_WO = 0, : 
D_DESCR_BITS = 1, : 
0_HI_ADR = i, : 
D_LO_ADR = 2, : 
D_WO_COUNT = 3, : 
D_WO1_STATUS = 4, ‘ 
D_wO2_STATUS = 5S, : 
D1_OF FSET 18, ' 
02_OF FSET = 36, : 
T_SIZE = 120, 
DESCR_SIZE = 128, 

D_SIZE = DESCR_SIZE / 2, 
80_0_SIZE = 16, 

BUF _SI = 4096, 

8_SIZE = BUF _SIZE / 2, 
SETUB_SIZE = : 
BYTE_COUNT = - ( BUF_SIZE / 4), 
PROM_ SIZE s 4096, 
CHSUM_OFFSET = 6, 

SA_RBL = 60'177775', 
PKT _LENGTH 2 1500, 

MAX “LENGTH ad 1534, 

LEGAL _LENGTH = 1514, 
ILLEGAL _LENGTH = 1536, 
LPB_PK = 60'0220', 
PKT TYPE = 12, 
SKIP_CNT = 0, 

. e = 1, 

= 15, 

SHORTEST poorer = 60, 
LSPL = 1514, 

PHA _INDEX s 19, 
KB _VEC_LOC = 0° , 
PF _VEC_LOC = $0'000024' 
CPU_LED = #$0'177524', 
KB_ADDR = 60'177560', 
KB_ENABLE * £0'000100' , 


owe + Ge ot TUM ose eae. ows 


D6 


12-Jul-1984 13:02:55 
8-Apr-1984 16:46:15 


STATUS WORD 0, FLAG WORD 


STATION ADR RCV BUF LENGTH - 3 WOS 


PACKET LENGTH 

PACKET LENGTH 

LEGAL PACKET LENGTH 
ILLEGAL PACKET LENGTH 
LOOPBACK PACKET 
PACKET TYPE 


SHORTEST SETUP PACKET LENGTH 
LONGEST SETUP PACKET LENGTH 
LONGEST SETUP PACKET LENGTH 
PHYSICAL ADDRESS INDEX IN THE 
TARGET_ADR VECTOR 


INPUT CONSOLE TERMINAL VECTOR LOC 
POWER FAIL VECTOR LOCATION 

TURN OFF CPU LED LIT ON OCOK 
CONSOLE TERMINAL INPUT ADDRESS 
ENABLE CONSOLE TERMINAL INPUT 


VAX-11 Blies-16 V4.0-579 Page 
SPIDERSUSERS : (BERG . DEQNA JQNALIB. R16;1 


SEQ 0275 


(4 


5 
) 


ecooooococoocoecoececoeoc“oeoocoooooooeocoooooo0q0q0q0q0o000o0osoo 


See 
$ 
) 
* 


CSR_STATUS = #0’ 100220' 
CSRI_STATUS = #0’ 000062' 
CSR2_STATUS = 60’ 000060’ , 
CSR_MASK = 60° 100220’ , 
CSRi_MASK = £0°010376' , 
CSR2_MASK = £0'167777'. 
CSR3_MASK = £0'010000' . 
PATRNL = 60'001411', 
PATRN2 = 60'001471', 
NXM_LO_ADR = #0'160000', 
NXM_HI_ADR = #0'000077', 
XFLG_MASK = $0‘ 140000’ , 
X1_MASK = 60° 100000’ . 
XWD1_MASK = £0'157760' , 
XWD2_MASK = $0'037777', 
XFLG_STATUS = #0'140000', 
XWD11_STATUS = #0'000000' , 
XWD12_STATUS = #0'000400', 
XWD14_STATUS = #0'047600', 
RFLG_MASK = #0’ 140000’. 
Ri_MASK = 60’ 100000’ , 
MASK s #0' 174017’ e 
RWO1_MASK = 60' 2 
2-MA » 60'177417', 
RWD1_STATUS = #0'020000', 
RWD11_STATUS = #0’ 100000’, 
RWD12_ STATUS = #0’ 160000’ , 
RWD13_STATUS = #0’000000' , 
RWD14_STATUS = #0°060000' , 
RWD15_STATUS = #0°000001', 
RWD16_STATUS = #0'044000' 


RFLG_STATUS = #0'140000', 


RHL _MASK 
RLL _MASK 


= 60'003400', 
= #0'000377', 


och eae -09ee menses oF 


E6 


12-Jul-1984 13:02:55 
68-Apr-1984 18:46:15 


: SEQ 0276 
VAX-11 Bliss-16 V4.0-579 Page 6 
SPIDERSUSERS: (BERG.DEQNAJQNALIB.R16;1 (5) 


TRANSMIT, RECEIVE AND CSR STATUS AND MASK WORD DEFINITIONS 


TRANSCEIVER POWER ( XC - BIT 12 ) 
TRANSCEIVER POWER ( XC - BIT 12 ) 


CSR STATIC BITS 
CSR STATIC BITS 


NXM ADDRESS - LOW ORDER BITS 
NXM ADDRESS - HIGH ORDER BITS 


TRANSMIT FLAG WORD MASK BITS 
TRANSMIT STATUS WO 1 MASK BITS 
TRANSMIT STATUS WD 1 MASK BITS 
TRANSMIT STATUS WD 2 MASK BITS 
EXPECTED TRANSMIT FLAG WORD 


EXPECTED TRANSMIT STATUS WD 1 

BIT 8 IS SET IN INTERNAL LOOOPBACK MODES 
BIT & IS RESET IN EXTERNAL LOOOPBACK MODES 
EXPECTED TRANSMIT STATUS WD 1 


RECEIVE FLAG WORD MASK BITS 


TUS WD 1 
STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 
EXPECTED RECEIVE STATUS WD 1 


EXPECTED RECEIVE FLAG WORD 


RCV HIGH ORDER LENGTH BITS 
RCV LOW ORDER LENGTH BITS 


eoooococecececooooooocoocooooq0o0o0o0000coso 


—— << ~ 


~ ° EE Re LR OL SS AOS ETL OED 


12-Jul-1984 13:02:55 
68-Apr-1984 18:46:15 





F6 


BUFFER DESCRIPTOR / CHAIN DESCRIPTOR BIT DEFINITIONS 


ILEL _SET 
ILEL_CLR 


VALID ADDRESS IF 1 
CHAIN ADDRESS IF 1 
END OF MESSAGE IF 1 
SETUP MODE PACKET IF 1 


BUFFER NOT USED IF 1 
LAST DESCRIPTOR IN CHAIN 


XMIT AND RCV LISTS INVALID 
INTERNAL AND EXTERNAL LOOPBACK BITS 
INTERNAL AND EXTERNAL LOOPBACK BITS 


INTERNAL LOOPBACK MODE 
INTERNAL /EXTENDED LOOPBACK MODE 
EXTERNAL LOOPBACK MODE 


MODE OF OPERATION 


ENABLE NORMAL 
ENABLE PROMISCUOUS MODE OF OPERATION 
ENABLE ALL MULTICAST MODE OF OPERATION 


TURN OFF LED 3 


VAX-11 Bliss-16 V4.0-579 Page 
SPIDERSUSERS : (BERG. DEQNA JQNALIB.R16; 1 


SEQ 0277 


7 
(6) 


oF © Ge SF Ge Ge Ge Ge Ge oF Ge Ge oe ce Ge Ge os ~ oF 


eocooooooooooooo0oooo 


See 
! STATION ADDRESS CONSTANTS 


SADR1 = 0, 
SADR2 « 1, 
SANRS = 2, 
CHSUM = 3, 


’ 
! HARDWARE AND SOFTWARE P-TABLE 


SWP _SIZE * 5. g 
HWP _SIZE = 2, : 


SET_IT = 1, 
CLR_IT = O; 


G6 


12-Jul-1984 15:02:55 
8-Apr-1984 16:46:15 


HIGH STATION ADDRESS BITS 
MIDOLE BITS 

LOW STATION ADDRESS BITS 
ACTUAL CHECKSUM INDEX 


EQUATES 


SOFTWARE P-TABLE SIZE ( WORDS ) 
HARDWARE P-TABLE SIZE ( WORDS ) 


SEQ 0278 
VAX-11 Bliss-16 V4.0-579 Page 
SPIDERSUSERS : (BERG. DEQNA JQNALIB.R16; 1 


8 
(7) 


OF GF GF OF OF GF GF SF SE Gt GF Ge GS Ge GF Ge GF GF GF Ge SF ES Gs Gr GF GF Se GF Gr Gs GF Gr GF GF GF Or os OF Oe Gs Gs Os Os Ge Os 
ooooocooooocccoeocooooooooooooeoooooc ooo0ocooococcocoso 


H6 


12-Jul-1984 13:02:55 VAX-11 Bliss-16 V4.0-579 ms 9 
68-Apr-1984 18:46:15 SPIDER SUSERS : [BERG . DEQNA JQNALIB.R16;1 (8) 


See 
THE CONTROL AND STATUS REGISTER BIT DEFINITIONS 


o 
: 
fac 
F 


ELD 
10P FIELDS . 

RE ={0, 1.01), ! RECEIVER ENABLE R/w ( ACTIVE HIGH ) 

SR ={ 1.1.0). ! SOFTWARE RESET R/W ( ACTIVE HIGH ) 

NI = { 2. 1.0), ! NXM INTERRUPT R (¢ ACTIVE HIGH ) 

BD = { 3. 1. 0 J. ! BOOT/DIAGNOSTIC ROM R/w ( ACTIVE HIGH ) 

XL ={ 4.1.0). ! XMIT LIST INVALID R ( ACTIVE HIGH ) 

RL = {5S. 1.0). ! RCV LIST INVALIO R ( ACTIVE HIGH ) 

IE = { 6. 1.0). ! INTERRUPT ENABLE R/w ( ACTIVE HIGH ) 

XI = {7.1.0 1. &! XMIT INTERRUPT REQUEST R/W ( ACTIVE HIGH ) 

IL = { 8. 1.0). ! INTERNAL LOOPBACK MODE R/W( ACTIVE LOW ) 

EL = { 9. 1. 0). ! EXTERNAL LOOPBACK MODE R/W ( ACTIVE HIGH ) 

SE = [10. 1. 0]. ! SANITY TIMER ENABLE R/W ( ACTIVE HIGH ) 

x1 = {11. 1. 0 }. ! RESERVED, UNUSABLE 

xC = [12, 1, 0}, ! TRANSCEIVER PUR R ( ACTIVE HIGH ) 

CA = (13. 1.0), ! CARRIER R ( ACTIVE HIGH ) 

x2 = [14. 1. 0 J]. ! RESERVED, UNUSABLE 

RI : [15. 1. 0], ! RCV INTERRUPT REQUEST R/W ( ACTIVE HIGH > 

LB ={ 8.2.0), * LOOPBACK BITS 

XL = {4.2.0}, ' XMIT AND RCV LISTS INVALID BITS 

ALL_BITS= [ 0,16, 0 }, * FETCH WHOLE WORD 

LO.NIBBLE = [ 0, 0, 0}, : 

HI-NIBBLE = { 0, 4. 0 ], : 

LOBYTE =[{0. 8.0). ; 

HI-BYTE = [ 0, 16. 0}, * GET WORD, ALL BITS 
“ADDR =[{0, 8,01}, ¢ STATION ADDRESS LOW BYTE 

ST-WORD =[ 0, 16,0], ' GET WORD, ALL BITS 

RCV_LO = [ 2, 0, 16,01, ! RCV BUFFER DESCRIPTOR LIST LOW ADDRESS 
VHI = [ 3. 0. 8 0) * RCV BUFFER DESCRIPTOR LIST HIGH ADDRESS 

XMIT_LO = { 4. 0. 16, 0 }. ' XMIT BUFFER DESCRIPTOR LIST LOW ADDRESS 

XMIT-HI = { 5, 0, 8, 0 2), ' XMIT BUFFER DESCRIPTOR LIST HIGH ADDRESS 

VEC_ADR = { 2, 8. 0), ‘ INTERRUPT VECTOR ADDRESS 

VEC_ALL = { 6. 0, 16, 0], * INTERRUPT VECTOR ADDRESS 

CSR_ALL = { 7, 0, 16, « CONTROL AND STATUS REGISTER 


oooooooooooocoooocoooooooo0o0o0o0o0o000000Cc0CCCooCOCSCOCSCSO 


See 
’ 


FIELD 
OL_FIELDS = 
SET 


FLGWD 


[oe ee | - —_ arFr bee De De he he De De | cee | cee | ee) —- ~_- rere ras rss ee - 


es*eeseeseseese#es+sse#se# @ 
~ 
- 
ee 


bebo dbaRP He SKS 


Ss. 0. 16, 
S 


6, 0. 16, 


o oOo eco ooooocoooceo o co coooooco oOo 


TRANSMIT AND RECEIVE DESCRIPTOR LIST FIELDS 


SEG 
VAX-11 Bliss-16 V4.0-579 —~y 


12-Jul-1984 13:02:55 Page 
SPIDERSUSERS : (BERG. DEQNA)QNALIB.R16;1 


68-Apr-1984 18:46:15 


XMIT OF RCV FLAG WORD 


DESCRIPTOR BITS 
XMIT BUFFER BEGINS ON BYTE BOUNDARY 


XMIT 


BUFFER ENDS ON BYTE BOUNDARY 


SET-UP PACKET IF 1 
LAST DESCRIPTOR IN CHAIN ( END ) 
DESCRIPTOR HAS CHAIN ADDRESS IF 1 
VALID ADDRESS IF 1 


LOW 16 BITS OF XMIT OR RCV BUFFER ADDRESS 
XMIT OR RCV PACKET WORD LENGTH 


XMIT OR RCV STATUS WORD 1 
FIFO BUFFER OVERFLOW 


SANITY TIMER ON AT POWER_UP 
NO CARRIER 
RUNT PACKET IN FIFO 


~- a OR LOOPBACK PACKET 


ERROR SUMMARY 

LAST DESCRIPTOR LIST IN CHAIN 

XMIT OR RCV STATUS WORD 2 

RECEIVE BYTE LENGTH ( LOW & BITS ) 
DESCRIPTOR LINK PRE-FILL STATUS WO 

BUFFER STATE ! XMIT ODD/EVEN ! HIGH ORDER ADR 


10 
(9) 


SEQ Nonny 


12-Jul-1984 15:02:55 VAX-11 Bliss-i6 V4.0-579 
68-Apr-1984 18:46:15 SPIDERSUSERS : [BERG .DEQNA JQNAL IB. ri6;1 


I/O PAGE BASE ADDRESS 
INTERRUPT VECTOR ADDRESS 
BR LEVEL 


o 
a 
snes 
. 
oe 
~ 
* 
° 
eed teed eed 


e 
om 


SOFTWARE P-TABLE FIELD DEFINITIONS 


vn 
— 


ELD 
at. aa 7 
ERR_CNT = [0,0,16,0) ! @ OF ERRORS BEFORE DROPPING DEQNA 
: 


So 
, 
cecoocoooooooooocooooooocoooo0o0°0o 


COMMAND QUALIFIERS 
BLISS/PDP11/ENV:NOEIS QNALIB.R16/LIST=QNALIB.LIS/LIBRARY =QNAL IB .L16/SOURCE =PAGE :53 


Lines/CPU Min: 7221 

Lexemes/CPU-Min: 34513 

Memory Used: 46 pages ; 
Library Precompi lation Complete , 


11 
(10) 


NQNAAO . EXE 


Partition name : DUMMY 
Identification : V0O1.0 
Task VIC : 
Task attributes: -HD 

Totel address windows : Re 
Task image size 


(300,11) 


Memory allocation map TKB 40.02 
2-JUL -84 13:16 


: 11040. words 


Task address limits: 002000 055063 
R-W disk blk limits: 000002 000055 000054 00044. 


eee Root segment: NGNA1 


R/W mem limits: 002000 055063 0535064 22068. 
Disk blk Limits: 000002 000055 000054 00044. 


Memory allocation synopsis: 


$CODE$:CRO,I,LCL »REL CON) 


$GLOB$: (RW.D,LCL,REL CON) 
$PLIT$:(RO,O,LCL,REL,CON) 
AASCOD:(RO,I,LCL,REL,CON) 
ABSCOD:(RO,I,LCL,REL CON) 
ACS$COO:(RO,I,LCL,REL,CON) 


- BLK.:CRW,I,LCI,REL,.CON) 


Globel symbols: 


ADR 000020 
BD.PRO 014570-R 


0026 12504 . 
015402 007036 03614. 
015402 007036 03614. 
024440 000420 00272. 
024440 00272. 
025060 021434 06988. 
025060 021434 06988. 
046514 006124 03156. 
046514 006124 03156. 
054640 000000 

054640 000224 00146. 
054640 000214 00140. 
055054 000010 00008. 


8 000 

BLSDIV 002604-R 
BLS$LAS 055054-R 
BLSMOD 002616-R 
BL$MUL 002360-R 
BLSSHF 002630-R 
BOE 000400 


BUF .LE 0153516-R 
CHECKS 015314-R 


ILO 


Page 1 


CNQNAA 2.4 


DESCR. 002476- -R 


File 


NQNA1 .OBJ;2 
NQNA2 .OBJ;1 
Bi6LI6.OLB;1 
NQNA1 .OBJ;2 
NQNA1 .OBJ;2 
NQNA2 .0BJ;1 
NGNAS .OBJ;1 
NQNA4 .OBJ;1 


B16SAV.0BJ;5 
NOQNAS .OBJ; 1 


DFSTBL 002206-R 
DOWN.C 015312-R 
DS$PCNT 002122-R 


ERRNBR 002176- -R 
ERRORS 046514-R 


ERRTYP 002174-R 
ERR.CO 015330-R 
ERR.FL 015326-R 
ETH.ST 014344-R 
EVL 000004 


E1SREP 047020-R 
FORM.H 053074-R 
GET.AD 015274-R 
GP$1 002310-R 
GP$2 0023520-R 
GP$3S 002534-R 


002342-R 
002350-R 


IBE 010000 
TOU 000040 
IER 020000 


INTERR 015302-R 
IOP.DA 015272-R 
IOP.TA 014324-R 
ISR 000100 


SEG 0262 


LSHARD 002310-R 

LSHIME 002120-R 
U SHECP 002016-R 
L¢HPTP 002022-R 
L$ARDL 002306-R 


Memory ellocation map 


1?-JUL -84 


L$HW 002206-R 


L$PRT o02112-R 
LSREPP 002062-R 

L$REV 002010-R 
LSRPT 024450-R 
L$SFTL 002332-R 
L$SOFT 0023534-R 


MSGO2 6054 - 
MSGO3 016142-R 


eee Task builder statistics: 


Totel work file references: 86933. 
Work file reads: O. 

Work file writes: 0. 
Size of core pool: 4016. words (15. pages) 
Size of work file: 3328. words (13. pages) 


Elapsed time:00:00:21 


SETUP. 013324-R 


NXM.IN 025050- 
PHYS.A 013276-R SET.RD 051712-R 


SET.XD 051770-R 
SP.TAB 002216-R 
STATIO 014360-R 


SWP.T0 002222- -R 
TADR1 0153576-R 


TBYTE1 015372-R 
TBYTE2 015373-R 
TBYTES 015374-R 
TBYTE4S 


EMPS O 
TMP.IO0 015332- -R 
TMP ..RE 015334-R 


T1l 035550 - -R 


037272-R 


WRT .ST 052610-R 
XBUF ..L. 015276-R 
XC.FLA 015322-R 
T.A 054340-R 
XMIT.B 007276-R 
XMIT.D 003076-R 
XMIT.I 054366-R 
XMIT.S 053556-R 
END 


$SAVES 054712-R 


SEQ 0283 


NQNAAO CREATED BY TKB ON 12-JUL-84 AT 13:16 
GLOBAL CROSS REFERENCE 
SYMBOL VALUE REFERENCES... 
ADR 000020 @ NQNAL @ NQNA2 
BD.PRO 014570-R @ NQNA1 NQNA3 NQNA4 
BITO 000001 @ NQNAL @ NQNA2 
BITOO 000001 ® NQNAL # NQNA2 
BITO1 900002 @ NQNAL @ NQNA2 
BITO2 @ NQNAL @ NQNA2 
BITOS 000010 @ NQNAL # NQNA2 
BITO4 000020 @ NQNAL #@ NQNA2 
BITOS 000040 @ NQNAl @ NQNA2 
BITO6 000100 @ NQNAL @ NQNA2 
BITO7 000200 @ NQNAL 4 NQNA2 
BITOS 000400 @ NQNAL #& NQNA2 
BITO9 001000 @ NQNAL #@ NQNA2 
BIT1 2 @ NQNAL # NQNA2 
BIT10 002000 @ NQNALl #& NQNA2 
BIT11 @ NQNAL & NQNA2 
BIT12 010000 @ NQNAL # NQNA2 
BITi3 020000 @ NQNAL #@ NQNA2 
BIT14 040000 @ NQNAL #@ NQNA2 
BITiS 100000 @ NQNAL 4 NQNA2 
BIT2 000004 @ NQNAL @ NQNA2 
BITS 000010 @® NQNAL & NQNA2 
BIT4 000020 @ NQNAL #@ NQNA2 
BITS 000040 @ NQNAl @ NQNA2 
BIT6 000100 @ NQNAl #@ NQNA2 
BIT7 @ NQNAl & NQNA2 
BITS @ NQNAL 4 NQNA2 
BITS 001000 @ NQNAi & NQNA2 
BLSOIV 002604-R @ B16MUL NQNAS 
BLS$LAS 055054-R  NOQNAS 
BL$MOD 002616-R @ B16MUL NQNA4 
BLSMUL 002360-R @ BI6MUL NQNA3 NQNA4 
BLSSHF 002630-R ¢ B16MUL NQNAS 
BOE 000400 @ NQNAL @® NQNA2] 
BUF.LE 0153516-R & NQNA1 
CHECKS 015314-R @ NQNA1 NQNA3 NQNA4 
CHK .CS 360-R NQNAS @ NQNA4G 
CHK.RC 051014-R NQNAS 4 NQNA4 
CHK.RI 047774-R NQNAS 9 NQNA4 
CHK.XM 050516-R NQNAS @ NQNA4 
CLR.BU 047746-R NQNAS #@ NQNA4 
CLR.DE 047720-R NQNAS @ NQNA4 
COMP 051274-R NQNAS @ NQNA4 
COUNTE 015306-R @ NQNAL NQNAS NQNA4 
CSR.WO 015320-R @ NQNAL NQNA3 NOQNA4 
DATA.B 0035276-R & NQNA1 NQNA3 NQNA4 
QNA. 015304-R @& NQNA1 NQNAS NQNA4 
DESCR. 002676-R & NQNAi NQNAS NQNA4 
DFSTBL 002206-R @ NQNA1 
-C 015312-R © NQNA1 NQNA3 NQNA4 
DSPCNT 002122-R & NQNAL 
EF .CON 36 @ NQNAL @ NQNA2 


SEQ 9285 
NQNAAO CREATED BY TKB ON 12-JUL-84 AT 13:16 PAGE 2 


GLOBAL CROSS REFERENCE CREF vo02 
SYMBOL VALUE REFERENCES... 


@ NQNA1 
@ NQNAL 
@ NQNA1 
@ NQNA1 
® NQNA1 
@ NQNA1 
@ NQNA1 


eooceos 
eos = 


NQNA3 


w 
225 


eeescegsscesreccessscceeeee 


Seeoeoeeso SSeeeeeeeeos 
sc 6 ¢o¢ 


parents 


Beit 
: 


NQNA4 


sesoecoc s9° 8 3S & 
ee ee ee ee ee ee 


@ NQNA1 








B7/ 


SEG 0286 


CREATED BY 1K ON 12-AL-64 AT 15:16 PAGE 3 


NQNA 4G 





NQNAAO CREATED BY TKB ON 12-JUL-84 AT 13:16 PAGE 4 seo 02e7 


GLOBAL CROSS REFERENCE CREt  vo2 


—_ 






017214-R 
017300-R 





NQNAAO CREATED BY TKB ON 12-JUL-84 AT 13:16 PAGE 5 SEQ 0288 


GLOBAL CROSS REFERENCE CREt v02 
SYMBOL VALUE REFERENCES... 
MSGS68  023140-R @ NQNAL NQNA3S NGNAS 
MSGS9 02 @ NQNAL NQNAS NQNA4 
& NQNAL NQNAS NQNAS 
@ NONA1 NQNA3 NQNAS 
@ NQNA1 NQNAS NQNA4 
@ NQNA1 NQNAS NQNA4 
® NQNA1 NQNAS NQNA4 
@ NQNA1 NOQNAS NQNA4 
@ NOQNA1 NQNA3 NQNA4 
@ NQNAL NQNAS NQNS4 
@ NQNAL NQNA3 NQNAS 
@ NQNA1 NQNAS NQNA4 
& NQNAL NQNA3 NQNA4 
@ NQNA1 NQNA3 
@ NQNA2 NONAS 
@ NQNA1 NQNA3 NQNA4 
@ NQNAL & NQNA2 
NQNAS @ NQNA4 
@ NQNAL @ NQNA2 
@ NQNAL & NONA2 NQNAS NQNA4 
@ NQNALl @ NQNA2 NQNA3 NQNA4 
@ NQNAL @ NQNA2 NQNAS NQNA4 
@ NQNAL @ NQNA2 NQNAS NQNA4 
@ NONAL @ NQNA2 NQNA3S NGNA4 
@ NQNAL @ NQNA2 NQNA3 NQNA4 
@ NQNAL @ NQNA2 NQNA3 NQNA4 
@® NONAL @ NQNA2 NQNAS NQNA4 
@ NQNA1 NQNA3 
© CNQNAA NQNAS 
@ NQNA1 NQNA3 NGNA4 
@ NQNA1 NQNA3 NQNA4 
@ NONAL NQNAS NQNA4 
@ NQNA1 NQNAS NQNAS 
@ NQNAL 
@ NQNA1 NQNA2 
@ NQNA1 NQNA2 
@ NQNAL NQNA2] 
@ NQNA‘ NQNA2 
@ NQNA1L NQNA2 
@ NQNA1 NQNA2 
& NQNA1 NQNA2 
® NQNA1 NQNAS NQNA4 
@ NOQNA1 NOQNA3 NQNAS 
@ NQNA1 NQNA3S NQNA4 
@ NONA1 NQNAS 
@ NQNA1 NQNA2 NQNA3 NQNA4 
NQNAS @ NQNA4 
NQNA4 
NQNA4 
NQNA4 
NQNA4 
NQNA4 





2 
go558 
sc °:S¢ 


us 


051770-R 


CREATED BY ITKB 


ON 12-AL-84 AT 13:16 


REFERENCES... 
@ NQNA1 
@ NQNA1 NQNA3 
@ NQNAL NQNA3 
@ NQNA1 NQNAS 
@ NQNA1 NQNAS 
@ NQNA1 NGNA2 
@ NONAL NQNAS 
@ NQNA1 NQNAS 
@ NQNAL NQNA3 
@ NQNA1 NQNA3S 
@ NQNA1 NQNA3 
@ NOQNAL NQNAS 
@ NQNAL NQNAS 
@ NQNA1 NQNAS 
@ NQNA1 NQNAS 
@ NQNA1 NQNAS 
@ NQNA1 NQNA3 
CNGNAA @ NONAL 
@ NQNAL NQNA2 
@ NQNA1 NQNA2 
® NQNA1 NQNA2 
@ NQNA1 NQNA2 
CNQNAA @& NQNA1 
@ NQNA1 NQNA2 
@ NQNA1 NQNA2 
@ NQNA1 NQNA2 
@ NQNA1 NQNA2 
@ NQNA1 NOQNA2 
NQNAS 9 NQNA4 
@ NQNAS 
NGNAl @ NGNAS 
NGNA1l @ NQNAS 
NQNAl & NQNAS 
NQNAL @ NQNAS 
NQNA1 @ NQNAS 
NQNAl @ NQNAS 
NQNAL @ NQNAS 
NQNAL @ NQNAS 
NGNAL @ NQNAS 
NQNALl @ NQNAS 
NQNAL 4 NOQNAS 
NQNAL @ NQNA3 
NQNAL @ NQGNAS 
NQNAL @ NQNAS 
NQNAL @ NQNAS 
NQNAl @ NQNAS 
NQNAl @ NQNAS 
NQNAL @ NQNAS 
NGNAl @ NQNAS 
NQNAL @ NQNAS 
NQNAL @ NQNAS 
@ NQNAL 4 NQNA2 
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GLOBAL CROSS REFERENCE CREF vo2 
SYMBOL VALUE REFERENCES... 
uP.CcCOU 015310-R © NQNAIL NGNA3 NQNA4S 
VER.DE 047526-R NGNAS © NOQNA4 
WAIT.F 054746-R @ CNGQNAA NQNAS 
WALKIN 052046-R NOGNAS @ NONAG 
© NQNA4 
xBUF NQNA3 NQNA4 
@ NQNA4S 
NQNA3 NQNA4S 
NQNAS NQNAG 
& NQNA4 
@ NQNA4 
@ CNQNAA NQNA3 NQNA4 
NQNA3 NQNA4 
NQNAS 





